From 574c17c4bdfe43a3081ddcbde4452dd477929c02 Mon Sep 17 00:00:00 2001
From: marty hiatt <martianhiatus [a t] riseup [d o t] net>
Date: Sun, 15 Oct 2023 11:54:28 +0200
Subject: toot-id>item-id, toot-json>item-json, item-type for nav, byline still
 needed

---
 lisp/mastodon-search.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'lisp/mastodon-search.el')

diff --git a/lisp/mastodon-search.el b/lisp/mastodon-search.el
index 9b4bb68..1f39088 100644
--- a/lisp/mastodon-search.el
+++ b/lisp/mastodon-search.el
@@ -261,7 +261,8 @@ If NOTE is non-nil, include user's profile note. This is also
       (propertize (car user)
                   'face 'mastodon-display-name-face
                   'byline t
-                  'toot-id id) ; for prev/next nav
+                  'item-type 'user
+                  'item-id id) ; for prev/next nav
       " : \n : "
       (propertize (concat "@" (cadr user))
                   'face 'mastodon-handle-face
@@ -275,7 +276,7 @@ If NOTE is non-nil, include user's profile note. This is also
           (mastodon-tl--render-text (cadddr user) acct)
         "")
       "\n")
-     'toot-json acct))) ; for compat w other processing functions
+     'item-json acct))) ; for compat w other processing functions
 
 (defun mastodon-search--print-tags (tags)
   "Print TAGS data as returned from a \"hashtags\" search query."
@@ -292,6 +293,8 @@ If NOTE is non-nil, include user's profile note. This is also
                        'mouse-face 'highlight
                        'mastodon-tag (car el)
                        'mastodon-tab-stop 'hashtag
+                       'item-type 'tag ; for next/prev nav
+                       'byline t ; for next/prev nav
                        'help-echo (concat "Browse tag #" (car el))
                        'keymap mastodon-tl--link-keymap)
            " : \n\n"))
-- 
cgit v1.2.3