]> code.delx.au - gnu-emacs-elpa/commitdiff
Use `avy-keys' for `avy-goto-subword-1'
authorOleh Krehel <ohwoeowho@gmail.com>
Fri, 8 May 2015 17:40:20 +0000 (19:40 +0200)
committerOleh Krehel <ohwoeowho@gmail.com>
Fri, 8 May 2015 17:40:20 +0000 (19:40 +0200)
* avy-jump.el (avy-goto-subword-0): Update.

Fixes #15

avy-jump.el

index eca101e48a5221c6eb66b244f08d829926ec00a0..539b21b48e2ff155675ee43eebc35c72aad891ed 100644 (file)
@@ -338,7 +338,9 @@ When PREDICATE is non-nil it's a function of zero parameters that
 should return true."
   (interactive "P")
   (require 'subword)
-  (let ((avy-keys (number-sequence ?a ?z))
+  (let ((avy-keys (if predicate
+                      avy-keys
+                    (number-sequence ?a ?z)))
         (case-fold-search nil)
         candidates)
     (avy-dowindows arg