Add avy action for embark-dwim
This commit is contained in:
1 parent
078d396565
commit
bb37ac0803
1 file changed
+10
@@ -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