branch: externals/corfu commit 4737127a6fd690bc4a7e51f392d45b683844bfe5 Author: Daniel Mendler <m...@daniel-mendler.de> Commit: Daniel Mendler <m...@daniel-mendler.de>
Use with-silent-modifications --- corfu.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/corfu.el b/corfu.el index 76f061d9ed..85df408389 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)