From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 7 Jun 2024 14:57:11 +0000 (-0400)
Subject: * lisp/subr.el (with-silent-modifications): Minor simplification
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c156efa0f4aeecee3ee612a85b29ec509c5387f8;p=emacs.git

* lisp/subr.el (with-silent-modifications): Minor simplification

(cherry picked from commit 24082fc3c3c779dc9ac9e27135feb0fe1166f796)
---

diff --git a/lisp/subr.el b/lisp/subr.el
index 8dfcacb6145..ab5db81c8fc 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -5086,8 +5086,7 @@ of that nature."
        (unwind-protect
            (progn
              ,@body)
-         (when (or (not ,modified)
-                   (eq ,modified 'autosaved))
+         (when (memq ,modified '(nil autosaved))
            (restore-buffer-modified-p ,modified))))))
 
 (defmacro with-output-to-string (&rest body)