From: Jay Belanger Date: Sat, 29 Dec 2007 00:23:41 +0000 (+0000) Subject: (math-read-token): Fix misplaced parentheses. X-Git-Tag: emacs-pretest-23.0.90~8789 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5fb4539b9edbfbf1b2b59b12fde9705a00663e70;p=emacs.git (math-read-token): Fix misplaced parentheses. --- diff --git a/lisp/calc/calc-aent.el b/lisp/calc/calc-aent.el index 5b93a544397..22022d8b0ce 100644 --- a/lisp/calc/calc-aent.el +++ b/lisp/calc/calc-aent.el @@ -775,9 +775,9 @@ in Calc algebraic input.") (setq math-exp-token 'string math-expr-data (math-match-substring math-exp-str 1) math-exp-pos (match-end 0))) - ((and (setq adfn (get calc-language 'math-lang-read))) + ((and (setq adfn (get calc-language 'math-lang-read)) (eval (nth 0 adfn)) - (eval (nth 1 adfn))) + (eval (nth 1 adfn)))) ((eq (string-match "%%.*$" math-exp-str math-exp-pos) math-exp-pos) (setq math-exp-pos (match-end 0)) (math-read-token))