branch: externals/avy
commit 034de4c0e900717ebcb6e19a973cf66beea54420
Author: Oleh Krehel <[email protected]>
Commit: Oleh Krehel <[email protected]>
avy.el: Add -above and -below versions of avy-goto-whitespace-end
Re #278
---
avy.el | 16 ++++++++++++++++
1 file changed, 16 insertions(+)
diff --git a/avy.el b/avy.el
index b83fb29b1e..c9c261785f 100644
--- a/avy.el
+++ b/avy.el
@@ -1396,6 +1396,22 @@ When ARG is non-nil, do the opposite of
`avy-all-windows'."
(avy-with avy-goto-word-0
(avy-goto-word-0 arg (point) (window-end (selected-window) t))))
+(defun avy-goto-whitespace-end-above (arg)
+ "Jump to the end of a whitespace sequence between point and window end.
+The window scope is determined by `avy-all-windows'.
+When ARG is non-nil, do the opposite of `avy-all-windows'."
+ (interactive "P")
+ (avy-with avy-goto-whitespace-end
+ (avy-goto-whitespace-end arg (window-start) (point))))
+
+(defun avy-goto-whitespace-end-below (arg)
+ "Jump to the end of a whitespace sequence between window start and point.
+The window scope is determined by `avy-all-windows'.
+When ARG is non-nil, do the opposite of `avy-all-windows'."
+ (interactive "P")
+ (avy-with avy-goto-whitespace-end
+ (avy-goto-whitespace-end arg (point) (window-end (selected-window) t))))
+
;;;###autoload
(defun avy-goto-word-1 (char &optional arg beg end symbol)
"Jump to the currently visible CHAR at a word start.
