diff options
| author | mousebot <mousebot@riseup.net> | 2021-06-19 12:37:07 +0200 |
|---|---|---|
| committer | mousebot <mousebot@riseup.net> | 2021-06-19 12:37:07 +0200 |
| commit | f9452225da575a8272b2880214a241b72efd5e4f (patch) | |
| tree | 109095b5c942ecd028bd64d09872686133f7e7f2 | |
| parent | c9a80513b451ebab95eca3b4dda7e2ece6bcbbd2 (diff) | |
hack to ensure toot buffer bindings are always enabled.
make mastodon-toot-mode is run in mastodon-toot--compose-buffer before
after-change-functions bugs.
this makes mastodon-toot work properly even if mastodon-mode has not yet been
run/loaded yet.
| -rw-r--r-- | lisp/mastodon-toot.el | 4 | ||||
| -rw-r--r-- | lisp/mastodon.el | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el index a0f886c..d9f895c 100644 --- a/lisp/mastodon-toot.el +++ b/lisp/mastodon-toot.el @@ -516,9 +516,9 @@ If REPLY-TO-ID is provided, set the MASTODON-TOOT--REPLY-TO-ID var." (when (not buffer-exists) (mastodon-toot--display-docs-and-status-fields) (mastodon-toot--setup-as-reply reply-to-user reply-to-id)) + (mastodon-toot-mode t) (push #'mastodon-toot--update-status-fields after-change-functions) - (mastodon-toot--update-status-fields) - (mastodon-toot-mode t))) + (mastodon-toot--update-status-fields))) (define-minor-mode mastodon-toot-mode "Minor mode to capture Mastodon toots." diff --git a/lisp/mastodon.el b/lisp/mastodon.el index 430362d..96a092f 100644 --- a/lisp/mastodon.el +++ b/lisp/mastodon.el @@ -30,7 +30,7 @@ ;; it is a labor of love. ;;; Code: -(require 'cl-lib) ; for `some' call in mastodon +(require 'cl-lib) ; for `cl-some' call in mastodon (declare-function discover-add-context-menu "discover") (declare-function emojify-mode "emojify") |