Mercurial > emacs
diff lisp/calc/calc-units.el @ 101001:14b421290b2f
Replace last-command-char with last-command-event.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Fri, 09 Jan 2009 03:57:12 +0000 |
parents | a9dc0e7c3f2b |
children | 2c12fbae77c2 |
line wrap: on
line diff
--- a/lisp/calc/calc-units.el Fri Jan 09 03:30:02 2009 +0000 +++ b/lisp/calc/calc-units.el Fri Jan 09 03:57:12 2009 +0000 @@ -349,7 +349,7 @@ (defun calc-quick-units () (interactive) (calc-slow-wrapper - (let* ((num (- last-command-char ?0)) + (let* ((num (- last-command-event ?0)) (pos (if (= num 0) 10 num)) (units (calc-var-value 'var-Units)) (expr (calc-top-n 1)))