emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/corfu e0ebfdfcda: Simplify window configuration handlin


From: ELPA Syncer
Subject: [elpa] externals/corfu e0ebfdfcda: Simplify window configuration handling
Date: Sat, 29 Jan 2022 18:57:24 -0500 (EST)

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

    Simplify window configuration handling
---
 corfu.el | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/corfu.el b/corfu.el
index 563bce92f7..871b06f2a6 100644
--- a/corfu.el
+++ b/corfu.el
@@ -826,7 +826,6 @@ there hasn't been any input, then quit."
 
 (defun corfu--pre-command ()
   "Insert selected candidate unless command is marked to continue completion."
-  (add-hook 'window-configuration-change-hook #'corfu-quit)
   (when corfu--preview-ov
     (delete-overlay corfu--preview-ov)
     (setq corfu--preview-ov nil))
@@ -841,7 +840,6 @@ there hasn't been any input, then quit."
 
 (defun corfu--post-command ()
   "Refresh Corfu after last command."
-  (remove-hook 'window-configuration-change-hook #'corfu-quit)
   (or (pcase completion-in-region--data
         (`(,beg ,end . ,_)
          (when (let ((pt (point)))
@@ -1018,7 +1016,7 @@ there hasn't been any input, then quit."
   (activate-change-group (setq corfu--change-group (prepare-change-group)))
   (setcdr (assq #'completion-in-region-mode minor-mode-overriding-map-alist) 
corfu-map)
   (add-hook 'pre-command-hook #'corfu--pre-command nil 'local)
-  (add-hook 'post-command-hook #'corfu--post-command nil 'local)
+  (add-hook 'post-command-hook #'corfu--post-command)
   ;; Disable default post-command handling, since we have our own
   ;; checks in `corfu--post-command'.
   (remove-hook 'post-command-hook #'completion-in-region--postch)
@@ -1038,9 +1036,8 @@ there hasn't been any input, then quit."
   ;; hiding, which is slow (Issue #48). See also corresponding vertico#89.
   (redisplay)
   (corfu--popup-hide)
-  (remove-hook 'window-configuration-change-hook #'corfu-quit)
   (remove-hook 'pre-command-hook #'corfu--pre-command 'local)
-  (remove-hook 'post-command-hook #'corfu--post-command 'local)
+  (remove-hook 'post-command-hook #'corfu--post-command)
   (when corfu--preview-ov (delete-overlay corfu--preview-ov))
   (when corfu--echo-timer (cancel-timer corfu--echo-timer))
   (when corfu--echo-message (corfu--echo-show ""))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]