From 4a7238052293cf71167302a05412ada77712164d Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Tue, 18 Feb 2003 11:00:10 +0000 Subject: [PATCH] (calc-macro-edit-variable): Fix character constant. --- lisp/calc/calc-prog.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)) -- 2.39.2