Add avy action for embark-dwim
This commit is contained in:
@@ -204,7 +204,17 @@
|
||||
(cdr (ring-ref avy-ring 0))))
|
||||
t)
|
||||
|
||||
(defun avy-action-embark-dwim (pt)
|
||||
(unwind-protect
|
||||
(save-excursion
|
||||
(goto-char pt)
|
||||
(embark-dwim))
|
||||
(select-window
|
||||
(cdr (ring-ref avy-ring 0))))
|
||||
t)
|
||||
|
||||
(setf (alist-get ?\; avy-dispatch-alist) 'avy-action-embark)
|
||||
(setf (alist-get ?\: avy-dispatch-alist) 'avy-action-embark-dwim)
|
||||
|
||||
(setq avy-timeout-seconds 0.25)
|
||||
;; Always show candidates even when there's just one, to give an
|
||||
|
||||
Reference in New Issue
Block a user