diff options
| author | Jim Blandy <jimb@redhat.com> | 1993-07-18 06:18:45 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1993-07-18 06:18:45 +0000 |
| commit | 42106ea5491ec03fe4b6afcea4dc7e3c03aafff4 (patch) | |
| tree | f4dd1a42efc43fda21d360c02adcc8667026a9b3 /lisp | |
| parent | 8a30241de33ee92f343ee7726869b5a5fc6f688f (diff) | |
| download | emacs-42106ea5491ec03fe4b6afcea4dc7e3c03aafff4.tar.gz | |
* bytecomp.el (byte-compile-from-buffer): Bind float-output-format
to "%.20e", not "%20e"; the latter is always ignored, since it
doesn't have a decimal point after the percent sign.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 1bf05c83168..b67be5ce60c 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -1244,7 +1244,7 @@ With argument, insert value in current buffer after the form." ;; buffer --> output-buffer, or buffer --> eval form, return nil (let (outbuffer) (let (;; Prevent truncation of flonums and lists as we read and print them - (float-output-format "%20e") + (float-output-format "%.20e") (case-fold-search nil) (print-length nil) ;; Simulate entry to byte-compile-top-level |