* calc/calc-forms.el (math-date-to-dt): Use integer date

when calling `math-date-to-julian-dt' and 'math-date-to-gregorian-dt'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0bd5fe0a149a1e50fc9f0cae0d66bf9352c7fefc..fdcde1dde0fe53b068fc99e37fcacf92ad4192f5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-11-18  Jay Belanger  <jay.p.belanger@gmail.com>
+
+       * calc/calc-forms.el (math-date-to-dt): Use integer date when
+       calling `math-date-to-julian-dt' and 'math-date-to-gregorian-dt'.
+
 2012-11-18  Glenn Morris  <rgm@gnu.org>
 
        * image.el (insert-image, insert-sliced-image): Doc fix.

diff --git a/lisp/calc/calc-forms.el b/lisp/calc/calc-forms.el
index d1df20c697c7774ce8fa03e56c7a7bb314f54f55..709250f9ba918f5c7f4643b583653cc4e70315d9 100644 (file)
--- a/lisp/calc/calc-forms.el
+++ b/lisp/calc/calc-forms.el
@@ -443,8 +443,8 @@ in the Gregorian calendar and the remaining part determines the time."
                                    (nth 3 calc-gregorian-switch)
                                    (apply 'math-absolute-from-gregorian-dt calc-gregorian-switch))
 ))
-                 (math-date-to-julian-dt value)
-               (math-date-to-gregorian-dt value))))
+                 (math-date-to-julian-dt date)
+               (math-date-to-gregorian-dt date))))
     (if (math-integerp value)
         dt
       (append dt