emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/mastodon 0aad468b2d 19/31: Merge pull request 'Fixed poll


From: ELPA Syncer
Subject: [nongnu] elpa/mastodon 0aad468b2d 19/31: Merge pull request 'Fixed poll expiry minimum time' (#697) from davemq/mastodon.el:fix-poll-minimum into develop
Date: Mon, 2 Jun 2025 13:01:20 -0400 (EDT)

branch: elpa/mastodon
commit 0aad468b2d7df8f59fa827d6bd7ee8e3171d56d8
Merge: a95bae2755 a369dc6178
Author: martianh <martianh@noreply.codeberg.org>
Commit: martianh <martianh@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 ()



reply via email to

[Prev in Thread] Current Thread [Next in Thread]