branch: elpa/hyperdrive commit 9e34eb28d1df4f10cf00b8f43ea7552623a34a67 Author: Joseph Turner <jos...@ushin.org> Commit: Joseph Turner <jos...@ushin.org>
Tidy: (hyperdrive--clean-buffer) Use delete-all-overlays --- hyperdrive-lib.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el index 82fa36be69..5572dc7dac 100644 --- a/hyperdrive-lib.el +++ b/hyperdrive-lib.el @@ -1400,8 +1400,7 @@ When BUFFER is nil, act on current buffer." (with-current-buffer (or buffer (current-buffer)) (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)))) (provide 'hyperdrive-lib)