diff options
author | Jay Belanger <jay.p.belanger@gmail.com> | 2009-02-21 19:19:58 +0000 |
---|---|---|
committer | Jay Belanger <jay.p.belanger@gmail.com> | 2009-02-21 19:19:58 +0000 |
commit | 7b3752ab87a08bab14453cc9c30abf42bb31b227 (patch) | |
tree | 29459acb80b61be94024f968a8dfb72bd106b614 /lisp | |
parent | 2f49167cb2a488c281419662119af0162c154e0c (diff) | |
download | emacs-7b3752ab87a08bab14453cc9c30abf42bb31b227.tar.gz |
(math-use-emacs-fn): Make sure that the lisp number is in decimal.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/ChangeLog | 5 | ||||
-rw-r--r-- | lisp/calc/calc-math.el | 4 |
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 19b20ede0d6..44ddc6a3485 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-02-21 Jay Belanger <jay.p.belanger@gmail.com> + + * calc/calc-math.el (math-use-emacs-fn): Make sure that the + lisp number is in decimal. + 2009-02-21 Chong Yidong <cyd@stupidchicken.com> * progmodes/compile.el (compilation-error-regexp-alist-alist): diff --git a/lisp/calc/calc-math.el b/lisp/calc/calc-math.el index 64c5465da3c..c8e8cc1f052 100644 --- a/lisp/calc/calc-math.el +++ b/lisp/calc/calc-math.el @@ -105,7 +105,9 @@ If this can't be done, return NIL." (math-read-number (number-to-string (funcall fn - (string-to-number (math-format-number (math-float x)))))) + (string-to-number + (let ((calc-number-radix 10)) + (math-format-number (math-float x))))))) (error nil)))))) (defun calc-sqrt (arg) |