From 1d75604eaded6a8482d28d57bc8e6a4d99d5caee Mon Sep 17 00:00:00 2001 From: Noam Postavsky Date: Thu, 26 Apr 2018 07:36:50 -0400 Subject: [PATCH] Add missing calendar-dlet* (Bug#31267) * lisp/calendar/calendar.el (calendar-generate-month): Use calendar-dlet* around evaluation of calendar-date-echo-text. --- lisp/calendar/calendar.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el index 16009df8245..71fb76ce213 100644 --- a/lisp/calendar/calendar.el +++ b/lisp/calendar/calendar.el @@ -1517,7 +1517,8 @@ line." (insert (propertize (format (format "%%%dd" calendar-day-digit-width) day) 'mouse-face 'highlight - 'help-echo (eval calendar-date-echo-text) + 'help-echo (calendar-dlet* ((day day) (month month) (year year)) + (eval calendar-date-echo-text)) ;; 'date property prevents intermonth text confusing re-searches. ;; (Tried intangible, it did not really work.) 'date t) -- 2.39.5