Mercurial > emacs
changeset 112391:93209af5dc0b
calc/calc-ext.el (calc-init-extensions): Map all `undo' keybindings to `calc-undo'.
| author | Jay Belanger <jay.p.belanger@gmail.com> |
|---|---|
| date | Thu, 20 Jan 2011 19:04:56 -0600 |
| parents | 1b25cd6a6e36 |
| children | 70d7e5c6e611 |
| files | lisp/ChangeLog lisp/calc/calc-ext.el |
| diffstat | 2 files changed, 6 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Thu Jan 20 23:43:27 2011 +0000 +++ b/lisp/ChangeLog Thu Jan 20 19:04:56 2011 -0600 @@ -1,3 +1,8 @@ +2011-01-21 Štěpán Němec <stepnem@gmail.com> (tiny change) + + * calc/calc-ext.el (calc-init-extensions): Map all `undo' + keybindings to `calc-undo'. + 2011-01-20 Stefan Monnier <monnier@iro.umontreal.ca> Don't mess with *temp*.
--- a/lisp/calc/calc-ext.el Thu Jan 20 23:43:27 2011 +0000 +++ b/lisp/calc/calc-ext.el Thu Jan 20 19:04:56 2011 -0600 @@ -136,8 +136,7 @@ (define-key calc-mode-map "\C-w" 'calc-kill-region) (define-key calc-mode-map "\M-w" 'calc-copy-region-as-kill) (define-key calc-mode-map "\M-\C-w" 'kill-ring-save) - (define-key calc-mode-map "\C-_" 'calc-undo) - (define-key calc-mode-map "\C-xu" 'calc-undo) + (define-key calc-mode-map [remap undo] 'calc-undo) (define-key calc-mode-map "\M-\C-m" 'calc-last-args) (define-key calc-mode-map "a" nil)