changeset 58510:b1042b68790c

Finish making previous change.
author Jay Belanger <jay.p.belanger@gmail.com>
date Thu, 25 Nov 2004 06:28:25 +0000
parents 1f786433175c
children 0a3797785946
files lisp/calc/calc-arith.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calc/calc-arith.el	Thu Nov 25 06:17:40 2004 +0000
+++ b/lisp/calc/calc-arith.el	Thu Nov 25 06:28:25 2004 +0000
@@ -2279,7 +2279,7 @@
 			     (math-add (math-floor (nth 3 a)) -1)
 			   (math-floor (nth 3 a)))))
 	((Math-vectorp a)
-	 (math-map-vec (function (lambda (x) (math-floor x prec))) a))
+	 (math-map-vec (function (lambda (x) (math-floor x math-floor-prec))) a))
 	((math-infinitep a)
 	 (if (or (math-posp a) (math-negp a))
 	     a