branch: externals/avy
commit 034de4c0e900717ebcb6e19a973cf66beea54420
Author: Oleh Krehel <ohwoeo...@gmail.com>
Commit: Oleh Krehel <ohwoeo...@gmail.com>

    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.

Reply via email to