emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 85b5d57 104/110: avy.el (avy-jump): Add predicate argument


From: Oleh Krehel
Subject: [elpa] master 85b5d57 104/110: avy.el (avy-jump): Add predicate argument
Date: Sat, 11 May 2019 10:15:54 -0400 (EDT)

branch: master
commit 85b5d574cdc4755b17ca549314774e15565f3e86
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    avy.el (avy-jump): Add predicate argument
    
    Fixes #267
---
 avy.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/avy.el b/avy.el
index c8af0b9..4bd16c1 100644
--- a/avy.el
+++ b/avy.el
@@ -1223,19 +1223,20 @@ exist."
     (ignore #'ignore)
     (t (error "Unexpected style %S" style))))
 
-(cl-defun avy-jump (regex &key window-flip beg end action)
+(cl-defun avy-jump (regex &key window-flip beg end action pred)
   "Jump to REGEX.
 The window scope is determined by `avy-all-windows'.
 When WINDOW-FLIP is non-nil, do the opposite of `avy-all-windows'.
 BEG and END narrow the scope where candidates are searched.
-ACTION is a function that takes point position as an argument."
+ACTION is a function that takes point position as an argument.
+When PRED is non-nil, it's a filter for matching point positions."
   (setq avy-action (or action avy-action))
   (let ((avy-all-windows
          (if window-flip
              (not avy-all-windows)
            avy-all-windows)))
     (avy-process
-     (avy--regex-candidates regex beg end))))
+     (avy--regex-candidates regex beg end pred))))
 
 (defun avy--generic-jump (regex window-flip &optional beg end)
   "Jump to REGEX.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]