avy.el (avy-action-kill-stay): Adjust for avy-goto-line

Re #191
This commit is contained in:
Oleh Krehel 2017-12-10 19:54:25 +01:00
parent 56f6590c20
commit 1b9f061d27

11
avy.el
View File

@ -669,11 +669,12 @@ Set `avy-style' according to COMMMAND as well."
(defun avy-action-kill-stay (pt)
"Kill sexp at PT."
(save-excursion
(goto-char pt)
(forward-sexp)
(kill-region pt (point))
(just-one-space))
(message "Killed: %s" (current-kill 0)))
(goto-char pt)
(avy-forward-item)
(kill-region pt (point))
(just-one-space))
(message "Killed: %s" (current-kill 0))
t)
(defun avy-action-teleport (pt)
"Kill sexp starting on PT and yank into the current location."