aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-toot.el
diff options
context:
space:
mode:
authorJohnson Denen <johnson.denen@gmail.com>2017-04-08 13:34:45 -0400
committerjdenen <Johnson.Denen@ascenaretail.com>2017-04-09 08:55:37 -0400
commitcce134294df7021e94b414ced616741ee6a4ffcb (patch)
tree61452cf06f031e6a3cab3f06dfa96ff3ff4c3c34 /lisp/mastodon-toot.el
parentb3faec5e80687b1c944e39dc2290922d133b5e65 (diff)
Update DOCSTRINGs
Diffstat (limited to 'lisp/mastodon-toot.el')
-rw-r--r--lisp/mastodon-toot.el6
1 files changed, 6 insertions, 0 deletions
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))