[elpa] externals/boxy d88b495 03/10: Go to first marker first, then cycle

[ELPA Syncer]

branch: externals/boxy
commit d88b495d023042ccfa735358ccd440c0ab30e662
Author: Tyler Grinn <tylergrinn@gmail.com>
Commit: Tyler Grinn <tylergrinn@gmail.com>

    Go to first marker first, then cycle
---
 boxy.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/boxy.el b/boxy.el
index 9087b52..cb0dcf0 100644
--- a/boxy.el
+++ b/boxy.el
@@ -1217,15 +1217,16 @@ If INCLUDE-ON-TOP is non-nil, also include height on 
top of box."
   (with-slots (markers) box
     (lambda ()
       (interactive)
-      (let ((first (car markers)))
-        (object-remove-from-list box :markers first)
-        (object-add-to-list box :markers first t))
       (let* ((marker (car markers))
              (buffer (marker-buffer marker))
              (pos (marker-position marker)))
         (save-selected-window
           (switch-to-buffer-other-window buffer)
-          (goto-char pos))))))
+          (goto-char pos)))
+      (let ((first (car markers)))
+        (object-remove-from-list box :markers first)
+        (object-add-to-list box :markers first t)))))
+
 
 (defun boxy-button-jump-to (box)
   "Jump to the first occurrence of a link for BOX in the same window."