changeset 41341:6ab668229754

(calc-slow-wrapper): Move (point) call outside of (function ...) wrapper.
author Colin Walters <walters@gnu.org>
date Wed, 21 Nov 2001 06:23:23 +0000
parents 00ed4838100e
children 141366cdb544
files lisp/calc/calc-macs.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calc/calc-macs.el	Wed Nov 21 02:53:52 2001 +0000
+++ b/lisp/calc/calc-macs.el	Wed Nov 21 06:23:23 2001 +0000
@@ -36,7 +36,7 @@
 
 (defmacro calc-slow-wrapper (&rest body)
   `(calc-do
-    (function (lambda () ,@body) (point))))
+    (function (lambda () ,@body)) (point)))
 
 (defmacro math-showing-full-precision (form)
   `(let ((calc-float-format calc-full-float-format))