From cce134294df7021e94b414ced616741ee6a4ffcb Mon Sep 17 00:00:00 2001 From: Johnson Denen Date: Sat, 8 Apr 2017 13:34:45 -0400 Subject: Update DOCSTRINGs --- lisp/mastodon-toot.el | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'lisp/mastodon-toot.el') diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el index e648a95..eb82f12 100644 --- a/lisp/mastodon-toot.el +++ b/lisp/mastodon-toot.el @@ -6,16 +6,21 @@ :group 'mastodon) (defun mastodon-new-toot () + "Updates a Mastodon instance with new toot. Content is captured in a new buffer." (interactive) (progn (switch-to-buffer-other-window (get-buffer-create "*new toot*")) (mastodon-toot-mode t))) (defun mastodon-toot--send-triage (status) + "Callback function to triage toot POST. + +STATUS is passed by `url-retrieve'." (mastodon--http-response-triage status (lambda () (switch-to-buffer (current-buffer))))) ;; FIXME (defun mastodon-toot--send () + "Kills new-toot buffer/window and POSTs contents to the Mastodon instance." (interactive) (let ((toot (buffer-string)) (endpoint (mastodon--api-for "statuses"))) @@ -29,6 +34,7 @@ (mastodon--access-token)))))))) (defun mastodon-toot--cancel () + "Kills new-toot buffer/window. Does not POST content to Mastodon." (interactive) (kill-buffer-and-window)) -- cgit v1.2.3