branch: elpa/mastodon
commit 734b7cc518758fe36b9428102a4151518666aec2
Author: Dave Marquardt <davem...@linux.ibm.com>
Commit: Dave Marquardt <dav...@noreply.codeberg.org>
Made mastodon-toot--read-poll-expiry accept any number of seconds.
---
lisp/mastodon-toot.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el
index 9ebb1ef0c7..e50d42d718 100644
--- a/lisp/mastodon-toot.el
+++ b/lisp/mastodon-toot.el
@@ -1487,7 +1487,8 @@ Return a cons of a human readable string, and a
seconds-from-now string."
options nil 'confirm)))
(or (assoc response options #'string=)
(if (< (string-to-number response) 600)
- (car options))))) ;; min 5 mins
+ (car options) ;; min 5 mins
+ (cons (format "%s seconds" response) response)))))
(defun mastodon-toot--poll-expiry-options-alist ()
"Return an alist of expiry options options in seconds."
