move next/prev item funs

1 files changed, 15 insertions, 15 deletions

diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 3167f9c..ec9c033 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -303,6 +303,12 @@ Optionally start from POS."
   (mastodon-tl--goto-toot-pos 'next-single-property-change
                               'mastodon-tl--more))
 
+(defun mastodon-tl--goto-prev-toot ()
+  "Jump to last toot header."
+  (interactive)
+  (mastodon-tl--goto-toot-pos 'previous-single-property-change
+                              'mastodon-tl--update))
+
 (defun mastodon-tl--goto-first-toot ()
   "Jump to first toot or item in buffer.
 Used on initializing a timeline or thread."
@@ -312,11 +318,17 @@ Used on initializing a timeline or thread."
   (mastodon-tl--goto-toot-pos 'next-single-property-change
                               'next-line)) ;dummy function as we need to feed it something
 
-(defun mastodon-tl--goto-prev-toot ()
-  "Jump to last toot header."
+(defun mastodon-tl--goto-next-item ()
+  "Jump to next item, e.g. filter or follow request."
+  (interactive)
+  (mastodon-tl--goto-toot-pos 'next-single-property-change
+                              'next-line))
+
+(defun mastodon-tl--goto-prev-item ()
+  "Jump to previous item, e.g. filter or follow request."
   (interactive)
   (mastodon-tl--goto-toot-pos 'previous-single-property-change
-                              'mastodon-tl--update))
+                              'previous-line))
 
 (defun mastodon-tl--remove-html (toot)
   "Remove unrendered tags from TOOT."
@@ -1223,18 +1235,6 @@ JSON is what is returned by by the server."
                                             (mastodon-tl--view-filters)
                                             (message "Filter for \"%s\" deleted!" phrase)))))))
 
-(defun mastodon-tl--goto-next-item ()
-  "Jump to next item, e.g. filter or follow request."
-  (interactive)
-  (mastodon-tl--goto-toot-pos 'next-single-property-change
-                              'next-line))
-
-(defun mastodon-tl--goto-prev-item ()
-  "Jump to previous item, e.g. filter or follow request."
-  (interactive)
-  (mastodon-tl--goto-toot-pos 'previous-single-property-change
-                              'previous-line))
-
 (defun mastodon-tl--get-follow-suggestions ()
   "Display a buffer of suggested accounts to follow."
   (interactive)