diff options
| author | Jay Belanger <jay.p.belanger@gmail.com> | 2009-07-03 01:43:33 +0000 |
|---|---|---|
| committer | Jay Belanger <jay.p.belanger@gmail.com> | 2009-07-03 01:43:33 +0000 |
| commit | 2e9b968b289df9e1237d21253c8057789fb33808 (patch) | |
| tree | 94a6439f4c3d5c57add19fb9a327341988b9e936 | |
| parent | d07e72d3c85fe8eeae8b6c9a9823ff886d1cfd39 (diff) | |
| download | emacs-2e9b968b289df9e1237d21253c8057789fb33808.tar.gz | |
(math-use-emacs-fn): Make sure that the number is formatted correctly.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/calc/calc-math.el | 6 |
2 files changed, 10 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a0527560fdf..126d0df81b4 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-07-03 Jay Belanger <jay.p.belanger@gmail.com> + + * calc-math.el (math-use-emacs-fn): Make sure that the number is + formatted correctly. + 2009-07-02 Juri Linkov <juri@jurta.org> * info.el: Virtual Info files and nodes. diff --git a/lisp/calc/calc-math.el b/lisp/calc/calc-math.el index c8e8cc1f052..0f934e0af77 100644 --- a/lisp/calc/calc-math.el +++ b/lisp/calc/calc-math.el @@ -106,7 +106,11 @@ If this can't be done, return NIL." (number-to-string (funcall fn (string-to-number - (let ((calc-number-radix 10)) + (let + ((calc-number-radix 10) + (calc-float-format (list 'float calc-internal-prec)) + (calc-group-digits nil) + (calc-point-char ".")) (math-format-number (math-float x))))))) (error nil)))))) |