[elpa] externals/ergoemacs-mode e718715 309/325: Add `mark-whole-buffer`

[Stefan Monnier]

branch: externals/ergoemacs-mode
commit e7187156a90dece523dc1d98f3ee161efeb2f44d
Author: Matthew Fidler <514778+mattfidler@users.noreply.github.com>
Commit: Matthew Fidler <514778+mattfidler@users.noreply.github.com>

    Add `mark-whole-buffer`
---
 ergoemacs-functions.el | 5 +++++
 ergoemacs-mode.el      | 1 +
 2 files changed, 6 insertions(+)

diff --git a/ergoemacs-functions.el b/ergoemacs-functions.el
index d67ff56..8453746 100644
--- a/ergoemacs-functions.el
+++ b/ergoemacs-functions.el
@@ -127,6 +127,11 @@ KEY3 is the optional third key in the sequence."
   "Ergoemacs replacement for `kill-line' using `ergoemacs--send-emacs-key'."
   (interactive)
   (ergoemacs--send-emacs-key ?\C-k))
+
+(defun ergoemacs-mark-whole-buffer ()
+  "Ergoemacs replacement for `mark-whole-buffer' using 
`ergoemacs--send-emacs-key'."
+  (interactive)
+  (ergoemacs--send-emacs-key ?\C-x ?h))
     
 (defvar ergoemacs-delete-functions
   '(delete-backward-char delete-char kill-word backward-kill-word)
diff --git a/ergoemacs-mode.el b/ergoemacs-mode.el
index a127e78..a71d7f8 100644
--- a/ergoemacs-mode.el
+++ b/ergoemacs-mode.el
@@ -133,6 +133,7 @@ Added beginning-of-buffer Alt+n (QWERTY notation) and 
end-of-buffer Alt+Shift+n"
 
 (defvar ergoemacs--send-emacs-keys-map (let ((map (make-sparse-keymap)))
                                          (define-key map [remap kill-line] 
'ergoemacs-kill-line)
+                                         (define-key map [remap 
mark-whole-buffer] 'ergoemacs-mark-whole-buffer)
                                          map)
   "This defines the remaps for the `ergoemacs-mode-send-emacs-keys' commands.")