aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/calc/calc-misc.el
diff options
context:
space:
mode:
authorGlenn Morris <[email protected]>2009-01-09 03:57:12 +0000
committerGlenn Morris <[email protected]>2009-01-09 03:57:12 +0000
commite93c003eb15f85f744a39c28a8fb43b8c6da9904 (patch)
tree3a9d6acabbc4bd35bdb1b1680eb16e12b4761651 /lisp/calc/calc-misc.el
parent4b09796d423bb241d597f147ce0d53567ce10b3f (diff)
Replace last-command-char with last-command-event.
Diffstat (limited to 'lisp/calc/calc-misc.el')
-rw-r--r--lisp/calc/calc-misc.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/calc/calc-misc.el b/lisp/calc/calc-misc.el
index b64f20d474..7637a9e326 100644
--- a/lisp/calc/calc-misc.el
+++ b/lisp/calc/calc-misc.el
@@ -472,8 +472,8 @@ When this key is used, calc-ext (the Calculator extensions module) will be
loaded and the keystroke automatically re-typed."
(interactive "P")
(require 'calc-ext)
- (if (keymapp (key-binding (char-to-string last-command-char)))
- (message "%s%c-" (calc-num-prefix-name n) last-command-char))
+ (if (keymapp (key-binding (char-to-string last-command-event)))
+ (message "%s%c-" (calc-num-prefix-name n) last-command-event))
(calc-unread-command)
(setq prefix-arg n))
@@ -491,7 +491,7 @@ loaded and the keystroke automatically re-typed."
(interactive)
(if (calc-minibuffer-contains "[-+]?\\(1[1-9]\\|[2-9][0-9]\\)#.*")
(progn
- (setq last-command-char (upcase last-command-char))
+ (setq last-command-event (upcase last-command-event))
(calcDigit-key))
(calcDigit-nondigit)))