From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sat, 9 Oct 2021 11:12:33 +0000 (+0200)
Subject: Simplify `clean-mode'
X-Git-Tag: emacs-29.0.90~3671^2~621^2~7
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f43a3a7cd7cfae10d7c29b1f84eb3b842ca0a83a;p=emacs.git

Simplify `clean-mode'

* lisp/simple.el (clean-mode): Simplify the property exclusion.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index f7e62e06ce1..841983a3b60 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -534,10 +534,7 @@ Other major modes are defined by comparison with this one."
     (dolist (overlay (overlays-in (point-min) (point-max)))
       (delete-overlay overlay))
     (set-text-properties (point-min) (point-max) nil)
-    (setq-local after-change-functions
-                (list
-                 (lambda (begin end _length)
-                   (set-text-properties begin end nil))))))
+    (setq-local yank-excluded-properties t)))
 
 ;; Special major modes to view specially formatted data rather than files.