diff options
| author | H Durer <h.duerer@gmail.com> | 2019-03-05 02:41:35 +0000 |
|---|---|---|
| committer | Johnson Denen <johnson.denen@gmail.com> | 2019-03-04 22:44:28 -0500 |
| commit | 3196ac0c89fb67eb79ccc10132a5e2c7baa65c99 (patch) | |
| tree | 7a613b3c597a8543826e483194e174c126ff26c3 /lisp/mastodon.el | |
| parent | f1856f391bf6311be3a43ec4ee8a07497de8072b (diff) | |
Fix #219 no `with-eval-after-load` in the code (#220)
The package-lint logic is too daft to cope with this (you cannot even mention it in a comment).
We now move the discover functionality into its own package and just mention in the README file how to make use of it.
Diffstat (limited to 'lisp/mastodon.el')
| -rw-r--r-- | lisp/mastodon.el | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/lisp/mastodon.el b/lisp/mastodon.el index 714986f..e5fae79 100644 --- a/lisp/mastodon.el +++ b/lisp/mastodon.el @@ -157,36 +157,5 @@ If REPLY-TO-ID is non-nil, attach new toot to a conversation." :group 'mastodon (read-only-mode 1)) -(with-eval-after-load 'mastodon - (when (require 'discover nil :noerror) - (discover-add-context-menu - :bind "?" - :mode 'mastodon-mode - :mode-hook 'mastodon-mode-hook - :context-menu '(mastodon - (description "Mastodon feed viewer") - (actions - ("Toots" - ("A" "Author" mastodon-profile--get-toot-author) - ("b" "Boost" mastodon-toot--boost) - ("c" "Toggle content" mastodon-tl--toggle-spoiler-text-in-toot) - ("f" "Favourite" mastodon-toot--favourite) - ("j" "Next" mastodon-tl--goto-next-toot) - ("k" "Prev" mastodon-tl--goto-prev-toot) - ("n" "Send" mastodon-toot) - ("r" "Reply" mastodon-toot--reply) - ("t" "Thread" mastodon-tl--thread) - ("u" "Update" mastodon-tl--update) - ("U" "Users" mastodon-profile--show-user)) - ("Timelines" - ("F" "Federated" mastodon-tl--get-federated-timeline) - ("H" "Home" mastodon-tl--get-home-timeline) - ("L" "Local" mastodon-tl--get-local-timeline) - ("N" "Notifications" mastodon-notifications--get) - ("T" "Tag" mastodon-tl--get-tag-timeline)) - ("Quit" - ("q" "Quit mastodon buffer. Leave window open." kill-this-buffer) - ("Q" "Quit mastodon buffer and kill window." kill-buffer-and-window))))))) - (provide 'mastodon) ;;; mastodon.el ends here |