Mercurial > emacs
changeset 49841:babed35678ca
(calc-macro-edit-variable): Fix character constant.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Tue, 18 Feb 2003 11:00:10 +0000 |
| parents | e4b97a8e48e6 |
| children | c785a7ac61c7 |
| files | lisp/calc/calc-prog.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc-prog.el Tue Feb 18 10:58:50 2003 +0000 +++ b/lisp/calc/calc-prog.el Tue Feb 18 11:00:10 2003 +0000 @@ -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))