mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-20 19:42:53 -08:00
Code Issues Projects Releases Wiki Activity

(calculator-eng-display): Don't call concat

Browse source 
with an integer argument.
This commit is contained in:
Gerd Moellmann 2001-10-12 09:04:39 +00:00
parent 396907e4f7
commit 96c867c76e
2 changed files with 9 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2001-10-12 Eli Barzilay <eli@barzilay.org>
* calculator.el (calculator-eng-display): Don't call concat
with an integer argument.
2001-10-10 Gerd Moellmann <gerd@gnu.org>
* international/iso-transl.el (iso-transl-e-caret)

6
lisp/calculator.el
View file

@ -4,7 +4,7 @@
;; Author: Eli Barzilay <eli@barzilay.org>
;; Keywords: tools, convenience
;; Time-stamp: <2001-09-23 02:24:35 eli>
;; Time-stamp: <2001-10-11 16:18:29 eli>
;; This file is part of GNU Emacs.
@ -988,7 +988,9 @@ the 'left or 'right when one of the standard modes is used."
(setq num (/ num 1000.0)) (setq exp (+ exp 3))
(setq i (1+ i)))))))
(or calculator-eng-tmp-show (setq calculator-eng-extra nil))
(let ((str (format (concat "%." calculator-number-digits "f")
(let ((str (format (concat "%." (number-to-string
calculator-number-digits)
"f")
num)))
(concat (let ((calculator-remove-zeros
;; make sure we don't leave integers