Simplify `clean-mode'

* lisp/simple.el (clean-mode): Simplify the property exclusion.
This commit is contained in:
Lars Ingebrigtsen 2021-10-09 13:12:33 +02:00
parent f35246db19
commit f43a3a7cd7

View file

@ -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.