From: Michael Heerdegen <michael_heerdegen@web.de>
Date: Fri, 1 May 2020 00:08:17 +0000 (+0200)
Subject: Inhibit modification hooks when saving eieio-persistent's
X-Git-Tag: emacs-28.0.90~7468
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c59e878439833d89998e03134ee9060f9c449fd9;p=emacs.git

Inhibit modification hooks when saving eieio-persistent's

* lisp/emacs-lisp/eieio-base.el (eieio-persistent-save): Bind
inhibit-modification-hooks -> t.
---

diff --git a/lisp/emacs-lisp/eieio-base.el b/lisp/emacs-lisp/eieio-base.el
index 2cb1f614ce3..010a2b673e1 100644
--- a/lisp/emacs-lisp/eieio-base.el
+++ b/lisp/emacs-lisp/eieio-base.el
@@ -473,7 +473,8 @@ instance."
     (let* ((cfn (or file (oref this file)))
            (default-directory (file-name-directory cfn)))
       (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
                      ;; FIXME: Makes a name relative to (oref this file),
                      ;; whereas I think it should be relative to cfn.