[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 ""))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/corfu e0ebfdfcda: Simplify window configuration handling,
ELPA Syncer <=