From 6c0ceb30205b15c7f9a1b414ca2f6b2e80f2f018 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Tue, 20 Aug 2024 03:04:00 +0100
Subject: mastodon transient (https://0x0.st/XJ14.txt)

---
 init.el | 71 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 71 insertions(+)

diff --git a/init.el b/init.el
index c676f40..968a085 100644
--- a/init.el
+++ b/init.el
@@ -2637,6 +2637,77 @@
   (jao-afio-goto-chats)
   (mastodon))
 
+;; https://0x0.st/XJ14.txt
+(jao-transient-major-mode mastodon
+ ["Timelines"
+   ("H" "home"            mastodon-tl--get-home-timeline)
+   ("L" "local"           mastodon-tl--get-local-timeline)
+   ("F" "federated"       mastodon-tl--get-federated-timeline)
+   ("K" "bookmarks"       mastodon-profile--view-bookmarks)
+   ("V" "favorites"       mastodon-profile--view-favourites)
+   ("'" "followed tags"   mastodon-tl--followed-tags-timeline)
+   ("@" "mentions"        mastodon-notifications--get-mentions)
+   ("N" "notifications"   mastodon-notifications-get)
+   ("\\" "of remote host" mastodon-tl--get-remote-local-timeline)]
+
+  ;; u                    mastodon-tl--update
+
+  ["Search"
+   ("s" "search"          mastodon-search--query)
+   ("#" "tagged"          mastodon-tl--get-tag-timeline)
+   ("\"" "followed tags"  mastodon-tl--list-followed-tags)
+   ("I" "filter"          mastodon-views--view-filters)
+   ("X" "lists"           mastodon-views--view-lists)]
+
+  ["Toots"
+   ("n" "next"            mastodon-tl--goto-next-item :transient t)
+   ("p" "prev"            mastodon-tl--goto-prev-item :transient t)
+   ("c" "spoiler"         mastodon-tl--toggle-spoiler-text-in-toot :transient t)
+   ("T" "thread"          mastodon-tl--thread)
+   ("b" "(un)boost"       mastodon-toot--toggle-boost :transient t)
+   ("f" "(un)fav"         mastodon-toot--toggle-favourite :transient t)
+   ("i" "(un)pin"         mastodon-toot--pin-toot-toggle :transient t)
+   ("k" "(un)bookmark"    mastodon-toot--toggle-bookmark :transient t)
+   ("v" "vote"            mastodon-tl--poll-vote)]
+
+  ;; Z                    mastodon-tl--report-to-mods
+  ;; o                    mastodon-toot--open-toot-url
+
+  ["Own Toots"
+   ("r" "replay"          mastodon-toot--reply)
+   ("t" "write"           mastodon-toot)
+   ("e" "edit"            mastodon-toot--edit-toot-at-point)
+   ("d" "delete"          mastodon-toot--delete-toot)
+   ("D" "del & redraft"   mastodon-toot--delete-and-redraft-toot)
+   ("E" "show edits"      mastodon-toot--view-toot-edits)]
+
+  ;; S                    mastodon-views--view-scheduled-toots
+
+  ["Users"
+   ("W" "follow"          mastodon-tl--follow-user)
+   ("R" "follow req"      mastodon-views--view-follow-requests)
+   ("G" "suggestions"     mastodon-views--view-follow-suggestions)
+   ("M" "mute user"       mastodon-tl--mute-user)
+   ("B" "block user"      mastodon-tl--block-user)
+   ("m" "message user"    mastodon-tl--dm-user)
+   ""
+   ("," "favouriters"     mastodon-toot--list-toot-favouriters)
+   ("." "boosters"        mastodon-toot--list-toot-boosters)]
+
+  ;; S-RET                mastodon-tl--unmute-user
+  ;; C-S-b                mastodon-tl--unblock-user
+
+  ["Profiles"
+   ("A" "author"          mastodon-profile--get-toot-author)
+   ("P" "any user"        mastodon-profile--show-user)
+   ("O" "own"             mastodon-profile--my-profile)
+   ("U" "update own"      mastodon-profile--update-user-profile-note)]
+
+  ["Misc"
+   ("C" "copy URL"        mastodon-toot--copy-toot-url)
+   ("?" "help"            describe-mode)
+   ("q" "quit"            transient-quit-one)])
+
 ;;;; startup
 (defun jao-chats (&optional p)
   (interactive "P")
-- 
cgit v1.2.3