aboutsummaryrefslogtreecommitdiff
path: root/evil-jumps.el
diff options
context:
space:
mode:
authorBailey Ling <bling@live.ca>2016-02-10 19:42:52 -0500
committerBailey Ling <bling@live.ca>2016-02-10 19:42:52 -0500
commit119b2acbaa30b017eedc99fb6583aa791ead323e (patch)
tree491d04d1d6d6df38424868ad89280ef0aecde1c6 /evil-jumps.el
parent47b92625128e0550435ebdff1cccc762f127245a (diff)
add more jump lists tests
Diffstat (limited to 'evil-jumps.el')
-rw-r--r--evil-jumps.el26
1 files changed, 13 insertions, 13 deletions
diff --git a/evil-jumps.el b/evil-jumps.el
index fea6f90..57c74ba 100644
--- a/evil-jumps.el
+++ b/evil-jumps.el
@@ -185,26 +185,26 @@ POS defaults to point."
"Go to older position in jump list.
To go the other way, press \
\\<evil-motion-state-map>\\[evil-jump-forward]."
- (let* ((count (or count 1))
- (struct (evil--jumps-get-current))
- (idx (evil-jumps-struct-idx struct)))
+ (let ((count (or count 1)))
(evil-motion-loop (nil count)
- (evil--jumps-message "jumping back %s" idx)
- (when (= idx -1)
- (setq idx (+ idx 1))
- (setf (evil-jumps-struct-idx struct) 0)
- (evil--jumps-push))
- (evil--jumps-jump-to-index (+ idx 1)))))
+ (let* ((struct (evil--jumps-get-current))
+ (idx (evil-jumps-struct-idx struct)))
+ (evil--jumps-message "jumping back %s" idx)
+ (when (= idx -1)
+ (setq idx (+ idx 1))
+ (setf (evil-jumps-struct-idx struct) 0)
+ (evil--jumps-push))
+ (evil--jumps-jump-to-index (+ idx 1))))))
(evil-define-motion evil-jump-forward (count)
"Go to newer position in jump list.
To go the other way, press \
\\<evil-motion-state-map>\\[evil-jump-backward]."
- (let* ((count (or count 1))
- (struct (evil--jumps-get-current))
- (idx (evil-jumps-struct-idx struct)))
+ (let ((count (or count 1)))
(evil-motion-loop (nil count)
- (evil--jumps-jump-to-index (- idx 1)))))
+ (let* ((struct (evil--jumps-get-current))
+ (idx (evil-jumps-struct-idx struct)))
+ (evil--jumps-jump-to-index (- idx 1))))))
(defun evil--jumps-window-configuration-hook (&rest args)
(let* ((window-list (window-list-1 nil nil t))