aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-toot.el
diff options
context:
space:
mode:
authormousebot <mousebot@riseup.net>2022-02-11 10:21:59 +0100
committermousebot <mousebot@riseup.net>2022-02-11 10:21:59 +0100
commit4e4f9f3aa2f3f08ebfa5d2ae3dbab0b13813fd8f (patch)
tree8e7115ea600fcf617d078e42d2eaf0b92dbeb587 /lisp/mastodon-toot.el
parentcc5e11851daa8979521520a1912a83e6ced26a00 (diff)
parent16685d4e3fb7fce2011d751fc26661aa41ddd3aa (diff)
Merge branch 'develop' into mpv-play-at-point
Diffstat (limited to 'lisp/mastodon-toot.el')
-rw-r--r--lisp/mastodon-toot.el9
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el
index 746b7d4..b50cbf6 100644
--- a/lisp/mastodon-toot.el
+++ b/lisp/mastodon-toot.el
@@ -2,10 +2,11 @@
;; Copyright (C) 2017-2019 Johnson Denen
;; Author: Johnson Denen <johnson.denen@gmail.com>
+;; Marty Hiatt <martianhiatus@riseup.net>
;; Maintainer: Marty Hiatt <martianhiatus@riseup.net>
;; Version: 0.10.0
;; Package-Requires: ((emacs "27.1"))
-;; Homepage: https://git.blast.noho.st/mouse/mastodon.el
+;; Homepage: https://codeberg.org/martianh/mastodon.el
;; This file is not part of GNU Emacs.
@@ -69,11 +70,13 @@
(autoload 'mastodon-tl--toot-id "mastodon-tl")
(autoload 'mastodon-toot "mastodon")
+;;;###autoload
(defgroup mastodon-toot nil
"Tooting in Mastodon."
:prefix "mastodon-toot-"
:group 'mastodon)
+;;;###autoload
(defcustom mastodon-toot--default-visibility "public"
"The default visibility for new toots.
@@ -86,16 +89,19 @@ followers-only), or \"direct\"."
(const :tag "followers only" "private")
(const :tag "direct" "direct")))
+;;;###autoload
(defcustom mastodon-toot--default-media-directory "~/"
"The default directory when prompting for a media file to upload."
:group 'mastodon-toot
:type 'string)
+;;;###autoload
(defcustom mastodon-toot--attachment-height 80
"Height of the attached images preview in the toot draft buffer."
:group 'mastodon-toot
:type 'integer)
+;;;###autoload
(defcustom mastodon-toot--enable-completion-for-mentions
(if (require 'company nil :noerror) "following" "off")
"Whether to enable company completion for mentions.
@@ -109,6 +115,7 @@ This is only used if company mode is installed."
(const :tag "following only" "following")
(const :tag "all users" "all")))
+;;;###autoload
(defcustom mastodon-toot--enable-custom-instance-emoji nil
"Whether to enable your instance's custom emoji by default."
:group 'mastodon-toot