aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon.el
diff options
context:
space:
mode:
authorJohnson Denen <johnson.denen@gmail.com>2017-04-16 07:35:33 -0400
committerJohnson Denen <johnson.denen@gmail.com>2017-04-16 07:38:02 -0400
commit43c1e81cd4945d6a96760718647d65a9a349fa4a (patch)
tree6f4d0b1f3209adad720639267061ab37bdd28e0f /lisp/mastodon.el
parentfc90522bf239c3fab749ca774621abdf6e60ae62 (diff)
Add function to update current timeline
Diffstat (limited to 'lisp/mastodon.el')
-rw-r--r--lisp/mastodon.el23
1 files changed, 12 insertions, 11 deletions
diff --git a/lisp/mastodon.el b/lisp/mastodon.el
index 3bddf55..336ffd4 100644
--- a/lisp/mastodon.el
+++ b/lisp/mastodon.el
@@ -102,7 +102,8 @@
(define-key map (kbd "n") #'mastodon-toot)
(define-key map (kbd "q") #'kill-this-buffer)
(define-key map (kbd "Q") #'kill-buffer-and-window)
- (define-key map (kbd "T") #'mastodon-tl--get-tag-timeline)))
+ (define-key map (kbd "T") #'mastodon-tl--get-tag-timeline)
+ (define-key map (kbd "u") #'mastodon-tl--update)))
(with-eval-after-load 'mastodon
(when (require 'discover nil :noerror)
@@ -113,16 +114,16 @@
:context-menu '(mastodon
(description "Mastodon feed viewer")
(actions
- ("Navigation"
- ("j" "Go to next toot" mastodon-tl--goto-next-toot)
- ("k" "Go to previous toot" mastodon-tl--goto-prev-toot))
- ("Feed switch"
- ("F" "Open federated timeline" mastodon-tl--get-federated-timeline)
- ("H" "Open home timeline" mastodon-tl--get-home-timeline)
- ("L" "Open local timeline" mastodon-tl--get-local-timeline)
- ("T" "Prompt for tag and open its timeline" mastodon-tl--get-tag-timeline))
- ("Toot"
- ("n" "Switch to 'mastodon-toot' buffer" mastodon-toot))
+ ("Toots"
+ ("j" "Next" mastodon-tl--goto-next-toot)
+ ("k" "Prev" mastodon-tl--goto-prev-toot)
+ ("n" "Send" mastodon-toot)
+ ("u" "Update" mastodon-tl--update))
+ ("Timelines"
+ ("F" "Federated" mastodon-tl--get-federated-timeline)
+ ("H" "Home" mastodon-tl--get-home-timeline)
+ ("L" "Local" mastodon-tl--get-local-timeline)
+ ("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)))))))