Fix arity of affe-orderless-regexp-compiler
This commit is contained in:
parent
191a223a1d
commit
755bd8b646
4
init.el
4
init.el
|
@ -841,11 +841,11 @@ They are completed by \"M-x TAB\" only in Tramp debug buffers."
|
|||
(and (executable-find "find")
|
||||
(executable-find "grep"))))
|
||||
(:load-after consult orderless vertico)
|
||||
(setq affe-regexp-compiler (defun affe-orderless-regexp-compiler (input _type)
|
||||
(setq affe-regexp-compiler (defun affe-orderless-regexp-compiler (input &rest _)
|
||||
(setq input (orderless-pattern-compiler input))
|
||||
(cons input (lambda (str) (orderless--highlight input str)))))
|
||||
(+with-eval-after-loads (affe vertico-multiform)
|
||||
(setq affe-regexp-compiler (defun affe-orderless-regexp-compiler (input _type)
|
||||
(setq affe-regexp-compiler (defun affe-orderless-regexp-compiler (input &rest _)
|
||||
(setq input (orderless-pattern-compiler input))
|
||||
(cons input (lambda (str) (orderless--highlight input str)))))
|
||||
(setf (alist-get 'affe-grep vertico-multiform-commands) '(buffer)
|
||||
|
|
Loading…
Reference in New Issue