Mercurial > emacs

diff lisp/calc/calc-units.el @ 101001:14b421290b2f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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)))