mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-21 06:55:39 +00:00
Code Issues Releases Activity

remember-data-file: Don't unconditionally call set-visited-file-name

Browse Source 
* lisp/textmodes/remember.el (remember-data-file): Don't
unconditionally call set-visited-file-name.
This commit is contained in:
Sean Whitton 2024-09-25 16:02:53 +01:00
parent 7766ba8419
commit 794bb2a2e3
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
lisp/textmodes/remember.el
View File

@ -378,8 +378,15 @@ exists) might be changed."
(set-default symbol value)
(when (buffer-live-p buf)
(with-current-buffer buf
(set-visited-file-name
(expand-file-name remember-data-file))))))
;; Don't unconditionally call `set-visited-file-name'
;; because that will probably change the major mode and
;; rename the buffer.
;; These must be avoided in the case where
;; `remember-notes-buffer-name' is "*scratch*", a
;; supported configuration.
(let ((value (expand-file-name value)))
(unless (string= buffer-file-name value)
(set-visited-file-name value)))))))
:initialize #'custom-initialize-default)
(defcustom remember-leader-text "** "