martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

calendar-check-holidays: Call calendar-increment-month

Browse Source 
* lisp/calendar/holidays.el (calendar-check-holidays): Call
calendar-increment-month (bug#80476).
This commit is contained in:
Liu Hui
2026-02-25 00:19:40 +08:00
committed by Sean Whitton
parent f3aff938fa
commit 8992eea7d5
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
lisp/calendar/holidays.el
View File

@@ -538,6 +538,7 @@ strings describing those holidays that apply on DATE, or nil if none do."
(displayed-year (calendar-extract-year date))
(calendar-total-months 1)
holiday-list)
(calendar-increment-month displayed-month displayed-year 1)
(dolist (h (calendar-holiday-list) holiday-list)
(if (calendar-date-equal date (car h))
(setq holiday-list (append holiday-list (cdr h)))))))