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

avy-jump.el (avy-goto-subword-0): Update candidate order

Browse Source 
Re #27
This commit is contained in:
Oleh Krehel 2015-05-09 14:43:52 +02:00
parent cd8e62603f
commit 3716cd0b02
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
avy-jump.el
View File

@ -419,17 +419,19 @@ should return true."
(let ((case-fold-search nil)
candidates)
(avy-dowindows arg
(let ((ws (window-start)))
(let ((ws (window-start))
window-cands)
(save-excursion
(goto-char (window-end (selected-window) t))
(subword-backward)
(while (> (point) ws)
(when (or (null predicate)
(and predicate (funcall predicate)))
(push (cons (point) (selected-window)) candidates))
(subword-backward)))))
(push (cons (point) (selected-window)) window-cands))
(subword-backward)))
(setq candidates (nconc candidates window-cands))))
(avy--goto
(avy--process (nreverse candidates) (avy--style-fn avy-style))))))
(avy--process candidates (avy--style-fn avy-style))))))
;;;###autoload
(defun avy-goto-subword-1 (&optional arg)