ld/avy
1
0
Fork 0
mirror of https://github.com/abo-abo/avy.git synced 2025-10-15 14:13:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

Add avy-goto-word-0-below and avy-goto-word-0-above

Browse Source 
These commands limit the scope of avy-goto-word-0 to above or below the
point thus save the number of keys required to jump to a certain word

Fixes #186
This commit is contained in:
Peter Nguyen 2017-03-25 16:28:23 +01:00 committed by Oleh Krehel
parent b8d7163915
commit d609eb98bd
1 changed files with 14 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
avy.el
View File

@ -1050,12 +1050,24 @@ the visible part of the current buffer following point."
(isearch-done)))) (isearch-done))))
;;;###autoload ;;;###autoload
(defun avy-goto-word-0 (arg) (defun avy-goto-word-0 (arg &optional beg end)
"Jump to a word start. "Jump to a word start.
The window scope is determined by `avy-all-windows' (ARG negates it)." The window scope is determined by `avy-all-windows' (ARG negates it)."
(interactive "P") (interactive "P")
(avy-with avy-goto-word-0 (avy-with avy-goto-word-0
(avy--generic-jump avy-goto-word-0-regexp arg avy-style))) (avy--generic-jump avy-goto-word-0-regexp arg avy-style beg end)))
(defun avy-goto-word-0-above (arg)
"Jump to a word start between window start and point."
(interactive "P")
(avy-with avy-goto-word-0
(avy-goto-word-0 arg (window-start) (point))))
(defun avy-goto-word-0-below (arg)
"Jump to a word start between point and window end."
(interactive "P")
(avy-with avy-goto-word-0
(avy-goto-word-0 arg (point) (window-end (selected-window) t))))
;;;###autoload ;;;###autoload
(defun avy-goto-word-1 (char &optional arg beg end symbol) (defun avy-goto-word-1 (char &optional arg beg end symbol)