Mercurial > emacs
comparison lisp/kmacro.el @ 47448:3a43982413a6
(kmacro-keymap): Changed bindings:
C-x C-k s to kmacro-start-macro, C-x C-k b to kmacro-bind-to-key.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Thu, 12 Sep 2002 21:52:26 +0000 |
| parents | a7b36abfcc69 |
| children | cff78e8e5a0a |
comparison
equal
deleted
inserted
replaced
| 47447:85021da80289 | 47448:3a43982413a6 |
|---|---|
| 172 | 172 |
| 173 ;; Keymap | 173 ;; Keymap |
| 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) |
| 181 (define-key map " " 'kmacro-step-edit-macro) | 181 (define-key map " " 'kmacro-step-edit-macro) |
| 182 (define-key map "l" 'kmacro-edit-lossage) | 182 (define-key map "l" 'kmacro-edit-lossage) |
| 188 (define-key map "\C-n" 'kmacro-cycle-ring-next) | 188 (define-key map "\C-n" 'kmacro-cycle-ring-next) |
| 189 (define-key map "\C-p" 'kmacro-cycle-ring-previous) | 189 (define-key map "\C-p" 'kmacro-cycle-ring-previous) |
| 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) |
| 197 (define-key map "n" 'name-last-kbd-macro) | 197 (define-key map "n" 'name-last-kbd-macro) |
| 198 (define-key map "e" 'edit-kbd-macro) | 198 (define-key map "e" 'edit-kbd-macro) |