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

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

[nongnu] elpa/vcomplete 5fefec3e91 40/91: Fix broken highlighting in com


From: ELPA Syncer
Subject: [nongnu] elpa/vcomplete 5fefec3e91 40/91: Fix broken highlighting in completion list buffers when completing in-region
Date: Tue, 24 May 2022 15:59:08 -0400 (EDT)

branch: elpa/vcomplete
commit 5fefec3e91576d4351711fce7b4686863e8b37dc
Author: Daniel Semyonov <daniel@dsemy.com>
Commit: Daniel Semyonov <daniel@dsemy.com>

    Fix broken highlighting in completion list buffers when completing in-region
    
    * vcomplete.el (vcomplete--reset-vars): Remove step which set
    'vcomplete--last-completion-overlay' to nil.
    (vcomplete--setup-minibuffer, vcomplete--setup-in-region): Add a step
    which sets 'vcomplete--last-completion-overlay' to nil (after a new
    completion has been initiated).
---
 vcomplete.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/vcomplete.el b/vcomplete.el
index 80b10a3eea..9484276b7e 100644
--- a/vcomplete.el
+++ b/vcomplete.el
@@ -225,8 +225,7 @@ With prefix argument N, move N items (negative N means move 
forward)."
 
 (defun vcomplete--reset-vars ()
   "Reset variables used by Vcomplete to their default values."
-  (setq vcomplete--last-completion-overlay nil
-        vcomplete--last-string nil)
+  (setq vcomplete--last-string nil)
   (remove-hook 'pre-command-hook #'vcomplete--set-last-string-in-minibuffer t)
   (remove-hook 'pre-command-hook #'vcomplete--set-last-string-in-region t)
   (remove-hook 'post-command-hook #'vcomplete--update-in-region t)
@@ -240,6 +239,7 @@ With prefix argument N, move N items (negative N means move 
forward)."
 (defun vcomplete--setup-minibuffer ()
   "Setup `vcomplete-mode' for the minibuffer."
   (when minibuffer-completion-table
+    (setq vcomplete--last-completion-overlay nil)
     (when vcomplete-auto-update
       (add-hook 'pre-command-hook
                 #'vcomplete--set-last-string-in-minibuffer nil t)
@@ -255,6 +255,7 @@ With prefix argument N, move N items (negative N means move 
forward)."
   ;; `completion-in-region-mode' is active.
   (when-let ((map (assq #'completion-in-region-mode
                         minor-mode-overriding-map-alist)))
+    (setq vcomplete--last-completion-overlay nil)
     (when vcomplete-auto-update
       (add-hook 'pre-command-hook
                 #'vcomplete--set-last-string-in-region nil t)



reply via email to

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