From cb8502f9ee8c3c393ba44613519bd5490ecf9775 Mon Sep 17 00:00:00 2001 From: Johnson Denen Date: Fri, 14 Apr 2017 09:27:42 -0400 Subject: Retrieve home timeline with `mastodon' function --- lisp/mastodon.el | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) (limited to 'lisp/mastodon.el') diff --git a/lisp/mastodon.el b/lisp/mastodon.el index 07f9f6c..eb5718c 100644 --- a/lisp/mastodon.el +++ b/lisp/mastodon.el @@ -30,6 +30,8 @@ ;;; Code: +(require 'mastodon-auth) + (defgroup mastodon nil "Interface with Mastodon." :prefix "mastodon-" @@ -55,12 +57,18 @@ (message (concat "mastodon.el v" (buffer-string))))) +;;;###autoload +(defun mastodon () + (interactive) + (require 'mastodon-tl) + (mastodon-tl--get "home")) + ;;;###autoload (defun mastodon-toot () "Update a Mastodon instance with new toot. Content is captured in a new buffer." (interactive) + (require 'mastodon-toot) (progn - (require 'mastodon-toot) (switch-to-buffer-other-window (get-buffer-create "*new toot*")) (mastodon-toot-mode t))) @@ -69,7 +77,6 @@ "Registers mastodon.el with the Mastodon instance." (interactive) (progn - (require 'mastodon-auth) (mastodon--store-client-id-and-secret))) (provide 'mastodon) -- cgit v1.2.3