[elpa] externals/corfu 68bba83: Mark window as dedicated to prevent frame reuse (Fix #60)

[ELPA Syncer]

branch: externals/corfu
commit 68bba8355b0d84199f1b55442f9447d9b9c70bea
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Mark window as dedicated to prevent frame reuse (Fix #60)
---
 corfu.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/corfu.el b/corfu.el
index 84228ed..1a67772 100644
--- a/corfu.el
+++ b/corfu.el
@@ -352,7 +352,10 @@ completion began less than that number of seconds ago."
     (let ((new (face-attribute 'corfu-background :background)))
       (unless (equal (frame-parameter corfu--frame 'background-color) new)
        (set-frame-parameter corfu--frame 'background-color new)))
-    (set-window-buffer (frame-root-window corfu--frame) buffer)
+    (let ((win (frame-root-window corfu--frame)))
+      (set-window-buffer win buffer)
+      ;; Mark window as dedicated to prevent frame reuse (#60)
+      (set-window-dedicated-p win t))
     ;; XXX HACK Make the frame invisible before moving the popup in order to 
avoid flicker.
     (unless (eq (cdr (frame-position corfu--frame)) y)
       (make-frame-invisible corfu--frame))