byte-compile

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."