[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master b61a872: * lisp/calendar/diary-lib.el (diary-remind
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] master b61a872: * lisp/calendar/diary-lib.el (diary-remind): Fix bug#30455. |
Date: |
Thu, 15 Feb 2018 00:42:00 -0500 (EST) |
branch: master
commit b61a87292671c917a4c6c1c146a016f5f544ae36
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>
* lisp/calendar/diary-lib.el (diary-remind): Fix bug#30455.
(diary-remind): Bind `days' as documented for diary-remind-message.
---
lisp/calendar/diary-lib.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el
index 181b117..acf4b20 100644
--- a/lisp/calendar/diary-lib.el
+++ b/lisp/calendar/diary-lib.el
@@ -2049,7 +2049,8 @@ calendar."
(when (setq diary-entry (eval sexp))
;; Discard any mark portion from diary-anniversary, etc.
(if (consp diary-entry) (setq diary-entry (cdr diary-entry)))
- (mapconcat #'eval diary-remind-message ""))))
+ (calendar-dlet* ((days days))
+ (mapconcat #'eval diary-remind-message "")))))
;; Diary entry may apply to one of a list of days before date.
((and (listp days) days)
(or (diary-remind sexp (car days) marking)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master b61a872: * lisp/calendar/diary-lib.el (diary-remind): Fix bug#30455.,
Stefan Monnier <=