mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Inhibit modification hooks when saving eieio-persistent's

Browse source 
* lisp/emacs-lisp/eieio-base.el (eieio-persistent-save): Bind
inhibit-modification-hooks -> t.
This commit is contained in:
Michael Heerdegen 2020-05-01 02:08:17 +02:00
parent 145aab0672
commit c59e878439
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/emacs-lisp/eieio-base.el
View file

@ -473,7 +473,8 @@ instance."
(let* ((cfn (or file (oref this file))) (let* ((cfn (or file (oref this file)))
(default-directory (file-name-directory cfn))) (default-directory (file-name-directory cfn)))
(cl-letf ((standard-output (current-buffer)) (cl-letf ((standard-output (current-buffer))
((oref this file) ;FIXME: Why change it? (inhibit-modification-hooks t)
((oref this file) ;FIXME: Why change it?
(if file (if file
;; FIXME: Makes a name relative to (oref this file), ;; FIXME: Makes a name relative to (oref this file),
;; whereas I think it should be relative to cfn. ;; whereas I think it should be relative to cfn.