(cal-tex-cursor-filofax-daily): Don't use oddp.

diff --git a/lisp/calendar/cal-tex.el b/lisp/calendar/cal-tex.el
index 2976f66eb215d094c31f2905ef02f41171f9fc2a..c69b6b85450b4fd0ecaad9299791fef8c96fd7f3 100644 (file)
--- a/lisp/calendar/cal-tex.el
+++ b/lisp/calendar/cal-tex.el
@@ -1256,10 +1256,11 @@ Holidays are included if `cal-tex-holidays' is t."
     (cal-tex-cmd "\\pagestyle{empty}")
     (calendar-for-loop i from 1 to n do
        (calendar-for-loop j from 1 to 5 do 
-       (insert (if (oddp j) "\\righthead" "\\lefthead"))
-       (cal-tex-arg (calendar-date-string date))
-       (insert "%\n")
-          (insert (if (oddp j) "\\rightday"  "\\leftday"))
+         (let ((odd (/= 0 (% j 2))))
+           (insert (if odd "\\righthead" "\\lefthead"))
+           (cal-tex-arg (calendar-date-string date))
+           (insert "%\n")
+           (insert (if odd "\\rightday"  "\\leftday")))
           (cal-tex-arg (cal-tex-latexify-list diary-list date))
           (cal-tex-arg (cal-tex-latexify-list holidays date))
           (cal-tex-arg (eval cal-tex-daily-string))