calc/calc-ext.el (calc-init-extensions): Map all `undo' keybindings to `calc-undo'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f2559c7c5aed4ea1dae8850d51d6dd81badf187b..6da4500d2664b0c429e70f2da2b25a2c99153cd1 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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*.

diff --git a/lisp/calc/calc-ext.el b/lisp/calc/calc-ext.el
index 7042c4079077e3d4437d37cce43ac751e4424fed..6fbccaad0b965249e85215421bc789abe35dd7a0 100644 (file)
--- a/lisp/calc/calc-ext.el
+++ b/lisp/calc/calc-ext.el
@@ -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)