aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus@disroot.org>2024-10-30 14:57:51 +0100
committermarty hiatt <martianhiatus@disroot.org>2024-10-30 14:57:51 +0100
commit2b281fcc49957fc779c0bff0a1807c4beb2ef376 (patch)
treea1633f13a7c3cd36cce91041d36b91cb34f4a2e7
parentdb0e6bdf54833df7ca89afe7341bd89e2e689f7b (diff)
byte-compile
-rw-r--r--lisp/mastodon-toot.el2
-rw-r--r--lisp/mastodon-transient.el2
-rw-r--r--lisp/mastodon-widget.el3
3 files changed, 4 insertions, 3 deletions
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el
index 4e116fa..82ebc90 100644
--- a/lisp/mastodon-toot.el
+++ b/lisp/mastodon-toot.el
@@ -1429,7 +1429,7 @@ MAX is the maximum number set by their instance."
"Prompt for new poll options and return as a list."
(interactive)
(if mastodon-toot-poll-use-transient
- (mastodon-create-poll)
+ (call-interactively #'mastodon-create-poll)
(mastodon-toot--read-poll)))
(defun mastodon-toot--read-poll ()
diff --git a/lisp/mastodon-transient.el b/lisp/mastodon-transient.el
index bbfbfc9..c96e1d5 100644
--- a/lisp/mastodon-transient.el
+++ b/lisp/mastodon-transient.el
@@ -332,7 +332,7 @@ Do not add more than the server's maximum setting."
(not (y-or-n-p "Need more than one option. Proceed? ")))
(and (> opts-count (mastodon-transient-max-poll-opts))
(not (y-or-n-p "More options than server max. Proceed? "))))
- (mastodon-create-poll)
+ (call-interactively #'mastodon-create-poll)
;; if we are called with no poll data, do not set:
(unless (not vals)
(setq tp-transient-settings
diff --git a/lisp/mastodon-widget.el b/lisp/mastodon-widget.el
index a326800..a576672 100644
--- a/lisp/mastodon-widget.el
+++ b/lisp/mastodon-widget.el
@@ -45,7 +45,8 @@ Note that such modes will need to require wid-edit.")
(defface mastodon-widget-face
'((t :inherit font-lock-function-name-face :weight bold :underline t))
- "Face for widgets.")
+ "Face for widgets."
+ :group 'mastodon)
(defun mastodon-widget--return-item-widgets (list)
"Return a list of item widgets for each item, a string, in LIST."