comparison lisp/calendar/cal-tex.el @ 36118:4459c383591a

(cal-tex-weekly4-box): Respect setting of cal-tex-24.
author Gerd Moellmann <gerd@gnu.org>
date Fri, 16 Feb 2001 13:15:18 +0000
parents 3f2b516f9ddc
children 7a94f1c588c4
comparison
equal deleted inserted replaced
36117:776ddfaf7665 36118:4459c383591a
926 (if (not weekend) 926 (if (not weekend)
927 (progn 927 (progn
928 (calendar-for-loop i from 8 to 12 do 928 (calendar-for-loop i from 8 to 12 do
929 (insert (format "{\\large\\sf %d}\\\\\n" i))) 929 (insert (format "{\\large\\sf %d}\\\\\n" i)))
930 (calendar-for-loop i from 1 to 5 do 930 (calendar-for-loop i from 1 to 5 do
931 (insert (format "{\\large\\sf %d}\\\\\n" i))))) 931 (insert (format "{\\large\\sf %d}\\\\\n"
932 (if cal-tex-24 (+ i 12) i))))))
932 (cal-tex-nl ".5cm") 933 (cal-tex-nl ".5cm")
933 (if weekend 934 (if weekend
934 (progn 935 (progn
935 (cal-tex-vspace "1cm") 936 (cal-tex-vspace "1cm")
936 (insert "\\ \\vfill") 937 (insert "\\ \\vfill")