From: Juanma Barranquero <lekktu@gmail.com>
Date: Tue, 18 Feb 2003 11:00:10 +0000 (+0000)
Subject: (calc-macro-edit-variable): Fix character constant.
X-Git-Tag: ttn-vms-21-2-B4~11150
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4a7238052293cf71167302a05412ada77712164d;p=emacs.git

(calc-macro-edit-variable): Fix character constant.
---

diff --git a/lisp/calc/calc-prog.el b/lisp/calc/calc-prog.el
index 3ea68584b4b..84bcbdd7a8b 100644
--- a/lisp/calc/calc-prog.el
+++ b/lisp/calc/calc-prog.el
@@ -821,7 +821,7 @@
 (defun calc-macro-edit-variable (&optional no-cmd)
   (let ((str "") ch)
     (or no-cmd (insert (symbol-name key-symbol) "\n"))
-    (if (memq (MacEdit-peek-char) '(?\+ ?\- ?\* ?\/ ?\^ ?\|))
+    (if (memq (MacEdit-peek-char) '(?\+ ?\- ?\* ?\/ ?^ ?\|))
 	(setq str (char-to-string (MacEdit-read-char))))
     (if (and (setq ch (MacEdit-peek-char))
 	     (>= ch ?0) (<= ch ?9))