From: Jay Belanger <jay.p.belanger@gmail.com>
Date: Mon, 30 May 2005 02:49:54 +0000 (+0000)
Subject: (calc-user-invocation): Check if calc-invocation-macro is non-nil.
X-Git-Tag: emacs-pretest-22.0.90~9429
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dd168a3e47cc6cfc109cc71eca02ed081bbe51d8;p=emacs.git

(calc-user-invocation): Check if calc-invocation-macro is non-nil.
---

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index 7656f14bb87..dbc5e90b917 100644
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -3431,7 +3431,7 @@ Also looks for the equivalent TeX words, \\gets and \\evalto."
 
 (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))