aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-11-10 19:02:36 +0100
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-11-10 19:03:48 +0100
commit9411f56f9f0d3a26e5948058dd919dcf71331c6a (patch)
tree52e08ff84dccfbc0f0f0663666b2cb8cedae241a /lisp
parentc873cf79e290b02dbdc3781a9a002f709e8f06c2 (diff)
FIX: -tl--get-poll - add a fallback format string
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon-tl.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 6f53f93..92fd12b 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -996,7 +996,12 @@ this just means displaying toot client."
((> (plist-get parsed :hours) 0)
(format "%s hours, %s minutes left" (plist-get parsed :hours) (plist-get parsed :minutes)))
((> (plist-get parsed :minutes) 0)
- (format "%s minutes left" (plist-get parsed :minutes))))))
+ (format "%s minutes left" (plist-get parsed :minutes)))
+ (t ;; we failed to guess:
+ (format "%s days, %s hours, %s minutes left"
+ (plist-get parsed :days)
+ (plist-get parsed :hours)
+ (plist-get parsed :minutes))))))
(defun mastodon-tl--poll-vote (option)
"If there is a poll at point, prompt user for OPTION to vote on it."