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

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

[elpa] externals/corfu dff12dce51 1/3: Rename variable


From: ELPA Syncer
Subject: [elpa] externals/corfu dff12dce51 1/3: Rename variable
Date: Wed, 8 Nov 2023 12:57:36 -0500 (EST)

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

    Rename variable
    
    Prevent bugs due to change of calling convention.
---
 corfu.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/corfu.el b/corfu.el
index 6945ac8e49..fd883fe9d5 100644
--- a/corfu.el
+++ b/corfu.el
@@ -265,7 +265,7 @@ the completion backend is costly."
 (defvar-local corfu--total 0
   "Length of the candidate list `corfu--candidates'.")
 
-(defvar-local corfu--highlight #'identity
+(defvar-local corfu--hilit #'identity
   "Lazy candidate highlighting function.")
 
 (defvar-local corfu--index -1
@@ -295,7 +295,7 @@ the completion backend is costly."
 (defconst corfu--state-vars
   '(corfu--base
     corfu--candidates
-    corfu--highlight
+    corfu--hilit
     corfu--index
     corfu--preselect
     corfu--scroll
@@ -622,7 +622,7 @@ FRAME is the existing frame."
       (corfu--metadata . ,corfu--metadata)
       (corfu--candidates . ,all)
       (corfu--total . ,(length all))
-      (corfu--highlight . ,(or hl #'identity))
+      (corfu--hilit . ,(or hl #'identity))
       (corfu--preselect . ,(if (or (eq corfu-preselect 'prompt) (not all)
                                    (and completing-file (eq corfu-preselect 
'directory)
                                         (= (length corfu--base) (length str))
@@ -728,7 +728,7 @@ FRAME is the existing frame."
                (`(,mf . ,acands) (corfu--affixate
                                   (cl-loop for i from 0 below corfu-count
                                            for c in (nthcdr corfu--scroll 
corfu--candidates)
-                                           collect (funcall corfu--highlight 
(substring c)))))
+                                           collect (funcall corfu--hilit 
(substring c)))))
                (`(,pw ,width ,fcands) (corfu--format-candidates acands))
                ;; Disable the left margin if a margin formatter is active.
                (corfu-left-margin-width (if mf 0 corfu-left-margin-width)))



reply via email to

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