nnmaildir expiry fix-up

* nnmaildir.el (nnmaildir-request-expire-articles): Ensure that `time'
is an integer to avoid later problems.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ff5bdce..96ad078 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-06-10  Toke Høiland-Jørgensen  <toke@toke.dk>  (tiny change)
+
+       * nnmaildir.el (nnmaildir-request-expire-articles): Ensure that `time'
+       is an integer to avoid later problems.
+
 2012-06-10  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * 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 bbace7c..7139a52 100644 (file)
--- 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)))