aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/kmacro.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/kmacro.el b/lisp/kmacro.el
index 01b2618c207..324878623bc 100644
--- a/lisp/kmacro.el
+++ b/lisp/kmacro.el
@@ -174,7 +174,7 @@ macro to be executed before appending to it."
174 174
175(defvar kmacro-keymap 175(defvar kmacro-keymap
176 (let ((map (make-sparse-keymap))) 176 (let ((map (make-sparse-keymap)))
177 (define-key map "\C-s" 'kmacro-start-macro) 177 (define-key map "s" 'kmacro-start-macro)
178 (define-key map "\C-k" 'kmacro-end-or-call-macro-repeat) 178 (define-key map "\C-k" 'kmacro-end-or-call-macro-repeat)
179 (define-key map "\C-e" 'kmacro-edit-macro-repeat) 179 (define-key map "\C-e" 'kmacro-edit-macro-repeat)
180 (define-key map "\r" 'kmacro-edit-macro) 180 (define-key map "\r" 'kmacro-edit-macro)
@@ -190,7 +190,7 @@ macro to be executed before appending to it."
190 (define-key map "\C-f" 'kmacro-set-format) 190 (define-key map "\C-f" 'kmacro-set-format)
191 (define-key map "\C-c" 'kmacro-set-counter) 191 (define-key map "\C-c" 'kmacro-set-counter)
192 (define-key map "\C-t" 'kmacro-swap-ring) 192 (define-key map "\C-t" 'kmacro-swap-ring)
193 (define-key map "\C-b" 'kmacro-bind-to-key) 193 (define-key map "b" 'kmacro-bind-to-key)
194 (define-key map "\C-d" 'kmacro-delete-ring-head) 194 (define-key map "\C-d" 'kmacro-delete-ring-head)
195 ;; Compatibility bindings 195 ;; Compatibility bindings
196 (define-key map "q" 'kbd-macro-query) 196 (define-key map "q" 'kbd-macro-query)