From d47e0cbe9ecaeb0cd4da12ab70f03d4c138f9265 Mon Sep 17 00:00:00 2001 From: Joseph Turner Date: Sun, 8 Oct 2023 02:54:10 -0700 Subject: [PATCH] Use delete-all-overlays in clean-mode * lisp/simple.el (clean-mode): Replace dolist --- lisp/simple.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/simple.el b/lisp/simple.el index b770d9d7d33..8f2bd84d805 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -549,8 +549,7 @@ Other major modes are defined by comparison with this one." "A mode that removes all overlays and text properties." (kill-all-local-variables t) (let ((inhibit-read-only t)) - (dolist (overlay (overlays-in (point-min) (point-max))) - (delete-overlay overlay)) + (delete-all-overlays) (set-text-properties (point-min) (point-max) nil) (setq-local yank-excluded-properties t))) -- 2.41.0