mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-15 07:41:09 -08:00
Code Issues Projects Releases Wiki Activity

(holiday-julian): Fix a problem with holidays in the last fortnight in

Browse source 
Julian October (sync from trunk 2008-03-31).
This commit is contained in:
Glenn Morris 2008-08-10 20:05:45 +00:00
parent 4f44bf18d3
commit bf9b4e4e7f
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/calendar/cal-julian.el
View file

@ -153,7 +153,7 @@ nil if it is not visible in the current calendar window."
(julian-end (calendar-julian-from-absolute end-date))
(julian-y1 (extract-calendar-year julian-start))
(julian-y2 (extract-calendar-year julian-end)))
(setq year (if (< 10 month) julian-y1 julian-y2))
(setq year (if (<= 10 month) julian-y1 julian-y2))
(let ((date (calendar-gregorian-from-absolute
(calendar-absolute-from-julian
(list month day year)))))