mirror of
https://github.com/abo-abo/avy.git
synced 2025-10-13 13:33:03 +00:00
avy.el (avy--process): Remove redundant copy-sequence
Hopefully redundant:)
This commit is contained in:
parent
6331b7a6de
commit
8606a8984b
3
avy.el
3
avy.el
@ -734,7 +734,6 @@ Use OVERLAY-FN to visualize the decision overlay."
|
|||||||
(mapcar (lambda (x) (cons x (selected-window)))
|
(mapcar (lambda (x) (cons x (selected-window)))
|
||||||
candidates)))
|
candidates)))
|
||||||
(let ((len (length candidates))
|
(let ((len (length candidates))
|
||||||
(cands (copy-sequence candidates))
|
|
||||||
res)
|
res)
|
||||||
(if (= len 0)
|
(if (= len 0)
|
||||||
(progn
|
(progn
|
||||||
@ -758,7 +757,7 @@ Use OVERLAY-FN to visualize the decision overlay."
|
|||||||
#'avy--remove-leading-chars)))))
|
#'avy--remove-leading-chars)))))
|
||||||
(avy--done)))
|
(avy--done)))
|
||||||
(cond ((eq res 'restart)
|
(cond ((eq res 'restart)
|
||||||
(avy--process cands overlay-fn))
|
(avy--process candidates overlay-fn))
|
||||||
;; ignore exit from `avy-handler-function'
|
;; ignore exit from `avy-handler-function'
|
||||||
((eq res 'exit))
|
((eq res 'exit))
|
||||||
(t
|
(t
|
||||||
|
Loading…
x
Reference in New Issue
Block a user