branch: elpa/mastodon
commit 0aad468b2d7df8f59fa827d6bd7ee8e3171d56d8
Merge: a95bae2755 a369dc6178
Author: martianh <marti...@noreply.codeberg.org>
Commit: martianh <marti...@noreply.codeberg.org>
Merge pull request 'Fixed poll expiry minimum time' (#697) from
davemq/mastodon.el:fix-poll-minimum into develop
---
lisp/mastodon-toot.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el
index e50d42d718..5381c0ff98 100644
--- a/lisp/mastodon-toot.el
+++ b/lisp/mastodon-toot.el
@@ -1486,8 +1486,8 @@ Return a cons of a human readable string, and a
seconds-from-now string."
(response (completing-read "poll ends in [or enter seconds]: "
options nil 'confirm)))
(or (assoc response options #'string=)
- (if (< (string-to-number response) 600)
- (car options) ;; min 5 mins
+ (if (< (string-to-number response) 300)
+ (cons "5 minutes" (number-to-string (* 60 5))) ;; min 5 mins
(cons (format "%s seconds" response) response)))))
(defun mastodon-toot--poll-expiry-options-alist ()
