From 62080b8da2f489acb5fe038a0b433b39e812ff7f Mon Sep 17 00:00:00 2001 From: =?utf8?q?Toke=20H=C3=B8iland-J=C3=B8rgensen?= Date: Sun, 10 Jun 2012 21:53:52 +0200 Subject: [PATCH] nnmaildir expiry fix-up * nnmaildir.el (nnmaildir-request-expire-articles): Ensure that `time' is an integer to avoid later problems. --- lisp/ChangeLog | 5 +++++ lisp/nnmaildir.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ff5bdce25..96ad0781c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2012-06-10 Toke Høiland-Jørgensen (tiny change) + + * nnmaildir.el (nnmaildir-request-expire-articles): Ensure that `time' + is an integer to avoid later problems. + 2012-06-10 Lars Magne Ingebrigtsen * shr.el: Add a iso-8859-1 cookie to make stuff work under other diff --git a/lisp/nnmaildir.el b/lisp/nnmaildir.el index bbace7c78..7139a528e 100644 --- a/lisp/nnmaildir.el +++ b/lisp/nnmaildir.el @@ -1461,7 +1461,7 @@ by nnmaildir-request-article.") (if (eq time 'immediate) (setq time 0) (if (numberp time) - (setq time (* time 86400))))) + (setq time (round (* time 86400)))))) (when no-force (unless (integerp time) ;; handle 'never (throw 'return (gnus-uncompress-range ranges))) -- 2.34.1