diff options
| author | marty hiatt <martianhiatus@disroot.org> | 2024-10-31 08:43:13 +0100 |
|---|---|---|
| committer | marty hiatt <martianhiatus@disroot.org> | 2024-10-31 08:43:13 +0100 |
| commit | c241b0ba9d809157aa4bca659a6a2cc04f362932 (patch) | |
| tree | 2492c180b0028a1df1751445ca1b66e6ba863bbc /lisp | |
| parent | 16c4ddcd693068c738ae4bb271c60841f1912f4c (diff) | |
| parent | 1e18934c705514dc3aad6170a50cd5875dab86bf (diff) | |
Merge branch 'develop'
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mastodon-toot.el | 2 | ||||
| -rw-r--r-- | lisp/mastodon-transient.el | 2 | ||||
| -rw-r--r-- | lisp/mastodon-widget.el | 3 | ||||
| -rw-r--r-- | lisp/mastodon.el | 4 |
4 files changed, 6 insertions, 5 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." diff --git a/lisp/mastodon.el b/lisp/mastodon.el index 119a045..ea4a4e2 100644 --- a/lisp/mastodon.el +++ b/lisp/mastodon.el @@ -6,8 +6,8 @@ ;; Author: Johnson Denen <johnson.denen@gmail.com> ;; Marty Hiatt <mousebot@disroot.org> ;; Maintainer: Marty Hiatt <mousebot@disroot.org> -;; Version: 1.1.3 -;; Package-Requires: ((emacs "28.1") (request "0.3.0") (persist "0.4") (tp "0.5")) +;; Version: 1.1.4 +;; Package-Requires: ((emacs "28.1") (request "0.3.0") (persist "0.4") (tp "0.6")) ;; Homepage: https://codeberg.org/martianh/mastodon.el ;; This file is not part of GNU Emacs. |