diff options
author | mousebot <mousebot@riseup.net> | 2021-12-15 21:16:24 +0100 |
---|---|---|
committer | mousebot <mousebot@riseup.net> | 2021-12-15 21:16:24 +0100 |
commit | 834dabcb9147e45633166b3f3b35b2b1d6fc64cc (patch) | |
tree | d01086e939af9eded6da6c73c37cfffae86e002e | |
parent | f22cfa60d301a1b834cb86f6f9b75b57d9dab6e8 (diff) |
customize option to enable custom emoji by default.
-rw-r--r-- | lisp/mastodon-toot.el | 5 | ||||
-rw-r--r-- | lisp/mastodon.el | 4 |
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el index 9112fc9..cb3cd44 100644 --- a/lisp/mastodon-toot.el +++ b/lisp/mastodon-toot.el @@ -106,6 +106,11 @@ This is only used if company mode is installed." (const :tag "following only" "following") (const :tag "all users" "all"))) +(defcustom mastodon-toot--enable-custom-instance-emoji nil + "Whether to enable your instance's custom emoji by default." + :group 'mastodon-toot + :type 'boolean) + (defvar-local mastodon-toot--content-warning nil "A flag whether the toot should be marked with a content warning.") diff --git a/lisp/mastodon.el b/lisp/mastodon.el index f9c18a0..662b691 100644 --- a/lisp/mastodon.el +++ b/lisp/mastodon.el @@ -223,7 +223,9 @@ If REPLY-JSON is the json of the toot being replied to." ;;;###autoload (add-hook 'mastodon-mode-hook (lambda () (when (require 'emojify nil :noerror) - (emojify-mode t)))) + (emojify-mode t) + (when mastodon-toot--enable-custom-instance-emoji + (mastodon-toot--enable-custom-emoji))))) (define-derived-mode mastodon-mode special-mode "Mastodon" "Major mode for Mastodon, the federated microblogging network." |