[elpa] externals/vertico 94e399e 3/4: vertico-buffer: Mark as read-only

[ELPA Syncer]

branch: externals/vertico
commit 94e399e814da4ac38d78bf1c016882a0ea8d1020
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    vertico-buffer: Mark as read-only
---
 extensions/vertico-buffer.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/extensions/vertico-buffer.el b/extensions/vertico-buffer.el
index 8b0ce39..f08d68c 100644
--- a/extensions/vertico-buffer.el
+++ b/extensions/vertico-buffer.el
@@ -76,9 +76,10 @@
         (prompt (minibuffer-prompt))
         (content (minibuffer-contents)))
     (with-current-buffer vertico-buffer--buffer
-      (erase-buffer)
-      (insert (propertize (concat count prompt) 'face 'minibuffer-prompt)
-              content "\n" (string-join lines)))
+      (with-silent-modifications
+        (erase-buffer)
+        (insert (propertize (concat count prompt) 'face 'minibuffer-prompt)
+                content "\n" (string-join lines))))
     (let ((win (or (get-buffer-window vertico-buffer--buffer)
                    (display-buffer vertico-buffer--buffer 
vertico-buffer-display-action))))
       (overlay-put vertico--candidates-ov 'window win)
@@ -121,7 +122,7 @@
     (setq-local display-line-numbers nil
                 truncate-lines t
                 show-trailing-whitespace nil
-                inhibit-modification-hooks t
+                buffer-read-only t
                 cursor-in-non-selected-windows 'box)))
 
 ;;;###autoload