From: Gabriel do Nascimento Ribeiro <gabriel.nascimento@nubank.com.br>
Date: Wed, 20 Jan 2021 16:54:43 +0000 (+0100)
Subject: Respect remember-save-after-remembering on remember-diary-extract-entries
X-Git-Tag: emacs-28.0.90~4189
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=38173af10df67cb36521cdcc2f1f42103d67de98;p=emacs.git

Respect remember-save-after-remembering on remember-diary-extract-entries

* lisp/textmodes/remember.el (remember-diary-extract-entries):
Save automatically if `remember-save-after-remembering' is non-nil
(bug#45811).
---

diff --git a/lisp/textmodes/remember.el b/lisp/textmodes/remember.el
index 6c94f8d03c8..7f107977d53 100644
--- a/lisp/textmodes/remember.el
+++ b/lisp/textmodes/remember.el
@@ -559,7 +559,10 @@ If this is nil, then `diary-file' will be used instead."
         (push (remember-diary-convert-entry (match-string 1)) list))
       (when list
         (diary-make-entry (mapconcat 'identity list "\n")
-                          nil remember-diary-file))
+                          nil remember-diary-file)
+        (when remember-save-after-remembering
+          (with-current-buffer (find-buffer-visiting diary-file)
+            (save-buffer))))
       nil))) ;; Continue processing
 
 ;;; Internal Functions: