Mercurial > emacs

diff lisp/calc/calc.el @ 62880:321a0876ac0b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(calc-user-invocation): Check if calc-invocation-macro is non-nil.
author Jay Belanger <jay.p.belanger@gmail.com>
date Mon, 30 May 2005 02:49:54 +0000
parents 4b90639651ef
children bc2eee483e93
line wrap: on
line diff
--- a/lisp/calc/calc.el	Sun May 29 16:09:50 2005 +0000
+++ b/lisp/calc/calc.el	Mon May 30 02:49:54 2005 +0000
@@ -3431,7 +3431,7 @@
 
 (defun calc-user-invocation ()
   (interactive)
-  (unless (stringp calc-invocation-macro)
+  (unless calc-invocation-macro
     (error "Use `Z I' inside Calc to define a `M-# Z' keyboard macro"))
   (execute-kbd-macro calc-invocation-macro nil))