(math-use-emacs-fn): Make sure that the lisp number is in decimal.

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)