1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 18:40:39 -08:00

Inhibit modification hooks when saving eieio-persistent's

* 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

View file

@ -473,6 +473,7 @@ 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))
(inhibit-modification-hooks t)
((oref this file) ;FIXME: Why change it? ((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),