From 8992eea7d5f603dbe6ed519482c4e12a7425be6d Mon Sep 17 00:00:00 2001 From: Liu Hui Date: Wed, 25 Feb 2026 00:19:40 +0800 Subject: [PATCH] calendar-check-holidays: Call calendar-increment-month * lisp/calendar/holidays.el (calendar-check-holidays): Call calendar-increment-month (bug#80476). --- lisp/calendar/holidays.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/calendar/holidays.el b/lisp/calendar/holidays.el index 453b233670e..f557ccfa167 100644 --- a/lisp/calendar/holidays.el +++ b/lisp/calendar/holidays.el @@ -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)))))))