summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Mendler <mail@daniel-mendler.de>2022-11-30 05:40:50 +0100
committerDaniel Mendler <mail@daniel-mendler.de>2022-11-30 05:40:50 +0100
commit4737127a6fd690bc4a7e51f392d45b683844bfe5 (patch)
tree884631ae3d6a29150811116100ccd1c15915d64d
parent9b4fdc00888141d807aa6fd8bec2bf00dd4c0435 (diff)
Use with-silent-modifications
-rw-r--r--corfu.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/corfu.el b/corfu.el
index 76f061d..85df408 100644
--- a/corfu.el
+++ b/corfu.el
@@ -357,8 +357,7 @@ The completion backend can override this with
(setq-local face-remapping-alist (copy-tree fr)
line-spacing ls)
(cl-pushnew 'corfu-default (alist-get 'default face-remapping-alist))
- (let ((inhibit-modification-hooks t)
- (inhibit-read-only t))
+ (with-silent-modifications
(erase-buffer)
(insert content)
(goto-char (point-min))))
@@ -494,8 +493,7 @@ A scroll bar is displayed from LO to LO+BAR."
(set-frame-parameter frame 'corfu--hide-timer nil)
(make-frame-invisible frame)
(with-current-buffer (window-buffer (frame-root-window frame))
- (let ((inhibit-modification-hooks t)
- (inhibit-read-only t))
+ (with-silent-modifications
(erase-buffer)))))
(defun corfu--hide-frame (frame)