diff options
| author | Colin Walters | 2001-11-21 06:24:04 +0000 |
|---|---|---|
| committer | Colin Walters | 2001-11-21 06:24:04 +0000 |
| commit | e7905671636b89df3abd3d46b94d1f0ceb6f6255 (patch) | |
| tree | ab8a7e35e1b3c116ba3be26388f3ce3d7c7b7405 | |
| parent | e95768c50273519a8b07a39217f98969fe9ffe41 (diff) | |
| download | emacs-e7905671636b89df3abd3d46b94d1f0ceb6f6255.tar.gz emacs-e7905671636b89df3abd3d46b94d1f0ceb6f6255.zip | |
(calc-slow-wrapper): Move (point) call outside of (function ...)
wrapper.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/calc/calc-macs.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cf2fc4aa007..8b6a6b97e3d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2001-11-21 Colin Walters <walters@debian.org> | ||
| 2 | |||
| 3 | * calc/calc-macs.el (calc-slow-wrapper): Move (point) call outside | ||
| 4 | of (function ...) wrapper. | ||
| 5 | |||
| 1 | 2001-11-20 Stefan Monnier <monnier@cs.yale.edu> | 6 | 2001-11-20 Stefan Monnier <monnier@cs.yale.edu> |
| 2 | 7 | ||
| 3 | * derived.el (define-derived-mode): Create the abbrev-table | 8 | * derived.el (define-derived-mode): Create the abbrev-table |
diff --git a/lisp/calc/calc-macs.el b/lisp/calc/calc-macs.el index 0aee9556aef..313331ba820 100644 --- a/lisp/calc/calc-macs.el +++ b/lisp/calc/calc-macs.el | |||
| @@ -36,7 +36,7 @@ | |||
| 36 | 36 | ||
| 37 | (defmacro calc-slow-wrapper (&rest body) | 37 | (defmacro calc-slow-wrapper (&rest body) |
| 38 | `(calc-do | 38 | `(calc-do |
| 39 | (function (lambda () ,@body) (point)))) | 39 | (function (lambda () ,@body)) (point))) |
| 40 | 40 | ||
| 41 | (defmacro math-showing-full-precision (form) | 41 | (defmacro math-showing-full-precision (form) |
| 42 | `(let ((calc-float-format calc-full-float-format)) | 42 | `(let ((calc-float-format calc-full-float-format)) |