I want to make it easier to microblog the current Org subtree.
(defun my-mastodon-toot-subtree ()
"Compose a buffer and include the current subtree."
(interactive)
(let ((text (org-export-as 'md t nil t)))
(mastodon-toot)
(insert text)))
The automatic link to my configuration is handled by a function that I add to org-export-filter-body-functions
:
https://sachachua.com/dotemacs#config-footer
This is part of my Emacs configuration