branch: externals/consult
commit 5279e251787fde9cad9c82158566b7fa894a5e42
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
consult--line-match: Simplify
---
consult.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/consult.el b/consult.el
index 1292480933..3d8b510b53 100644
--- a/consult.el
+++ b/consult.el
@@ -3011,14 +3011,13 @@ CURR-LINE is the current line number."
(setcdr default-cand nil)
(nconc before candidates)))))))
-(defun consult--line-match (selected candidates input &rest rest)
+(defun consult--line-match (selected candidates input &rest _)
"Lookup position of match.
SELECTED is the currently selected candidate.
CANDIDATES is the list of candidates.
-INPUT is the input string entered by the user.
-REST are the remaining arguments passed to lookup."
- (when-let (pos (apply #'consult--lookup-location selected candidates input
rest))
+INPUT is the input string entered by the user."
+ (when-let (pos (consult--lookup-location selected candidates))
(if (or (string-blank-p input)
(eq consult-line-point-placement 'line-beginning))
pos