[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)))