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

Re #27

diff --git a/avy-jump.el b/avy-jump.el
index ad1e125a32135e9d3028e32c8d07f1407c15693f..125c82130aec40d72042362b396032087f6d6341 100644 (file)
--- a/avy-jump.el
+++ b/avy-jump.el
@@ -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)