[Emacs-diffs] Changes to emacs/lisp/calc/calc-aent.el,v

[Jay Belanger]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Jay Belanger <jpb>      07/12/29 00:23:41

Index: calc-aent.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/calc/calc-aent.el,v
retrieving revision 1.44
retrieving revision 1.45
diff -u -b -r1.44 -r1.45
--- calc-aent.el        27 Dec 2007 17:33:36 -0000      1.44
+++ calc-aent.el        29 Dec 2007 00:23:41 -0000      1.45
@@ -775,9 +775,9 @@
              (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))