Avy isearch action
This commit is contained in:
@@ -213,8 +213,15 @@
|
|||||||
(cdr (ring-ref avy-ring 0))))
|
(cdr (ring-ref avy-ring 0))))
|
||||||
t)
|
t)
|
||||||
|
|
||||||
|
(defun avy-action-isearch (pt)
|
||||||
|
(unwind-protect
|
||||||
|
(goto-char pt)
|
||||||
|
(isearch-forward-thing-at-point))
|
||||||
|
t)
|
||||||
|
|
||||||
(setf (alist-get ?\; avy-dispatch-alist) 'avy-action-embark)
|
(setf (alist-get ?\; avy-dispatch-alist) 'avy-action-embark)
|
||||||
(setf (alist-get ?\: avy-dispatch-alist) 'avy-action-embark-dwim)
|
(setf (alist-get ?\: avy-dispatch-alist) 'avy-action-embark-dwim)
|
||||||
|
(setf (alist-get ?i avy-dispatch-alist) 'avy-action-isearch)
|
||||||
|
|
||||||
(setq avy-timeout-seconds 0.25)
|
(setq avy-timeout-seconds 0.25)
|
||||||
;; Always show candidates even when there's just one, to give an
|
;; Always show candidates even when there's just one, to give an
|
||||||
|
|||||||
Reference in New Issue
Block a user