[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 0df23b7 2/2: Fix recent remember-diary-extract-entries change
From: |
Lars Ingebrigtsen |
Subject: |
master 0df23b7 2/2: Fix recent remember-diary-extract-entries change |
Date: |
Wed, 20 Jan 2021 17:31:01 -0500 (EST) |
branch: master
commit 0df23b73e4718937bcaddf9008ad8ef9ca3a2413
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Fix recent remember-diary-extract-entries change
* lisp/textmodes/remember.el (remember-diary-extract-entries): Use
`remember-diary-file' over `diary-file'.
---
lisp/textmodes/remember.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/lisp/textmodes/remember.el b/lisp/textmodes/remember.el
index 7f10797..811a265 100644
--- a/lisp/textmodes/remember.el
+++ b/lisp/textmodes/remember.el
@@ -549,6 +549,8 @@ If this is nil, then `diary-file' will be used instead."
:type 'regexp
:version "28.1")
+(defvar diary-file)
+
;;;###autoload
(defun remember-diary-extract-entries ()
"Extract diary entries from the region based on `remember-diary-regexp'."
@@ -561,7 +563,8 @@ If this is nil, then `diary-file' will be used instead."
(diary-make-entry (mapconcat 'identity list "\n")
nil remember-diary-file)
(when remember-save-after-remembering
- (with-current-buffer (find-buffer-visiting diary-file)
+ (with-current-buffer (find-buffer-visiting (or remember-diary-file
+ diary-file))
(save-buffer))))
nil))) ;; Continue processing