branch: elpa/mastodon
commit 558d8aea5c5e3a523116ad7a6c3d070914cc94f9
Author: marty hiatt <martianhia...@disroot.org>
Commit: marty hiatt <martianhia...@disroot.org>
use poll symbol in toots with polls, like in notifs
---
lisp/mastodon-tl.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index e05d6c68e3..610b48c34a 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -171,7 +171,7 @@ nil."
(status . ("✍" . "[posted]"))
(replied . ("⬇" . "↓"))
(reply-bar . ("┃" . "|"))
- (poll . ("📊" . ""))
+ (poll . ("📊" . "[poll]"))
(follow . ("👤" . "+"))
(follow_request . ("👤" . "+"))
(severed_relationships . ("🔗" . "//"))
@@ -1461,7 +1461,9 @@ LENGTH is of the longest option, for formatting."
(let* ((options (mastodon-tl--map-alist 'title .options))
(longest (car (sort (mapcar #'length options ) #'>)))
(counter 0))
- (concat "\nPoll: \n\n"
+ (concat "\n"
+ (mastodon-tl--symbol 'poll)
+ "\n\n"
(mapconcat (lambda (option)
(setq counter (1+ counter))
(mastodon-tl--format-poll-option
