(nnimap-date-days-ago): Handle byte-compiler warnings differently.

2 files changed, 7 insertions, 1 deletions

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 052a7fdf5fc..514de4501ca 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,9 @@
+2005-04-11  Lute Kamstra  <lute@gnu.org>
+
+        * message.el (message-make-date): Handle byte-compiler warnings
+        differently.
+        * nnimap.el (nnimap-date-days-ago): Ditto.
+
 2005-04-10  Stefan Monnier  <monnier@iro.umontreal.ca>
 
         * mm-util.el (mm-string-to-multibyte): New function.
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index d7cec7a864f..31d96cdd375 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -1386,10 +1386,10 @@ function is generally only called when Gnus is shutting down."
         (list (- ms 1) (+ (expt 2 16) ls))
       (list ms ls))))
 
+(eval-when-compile (require 'parse-time))
 (defun nnimap-date-days-ago (daysago)
   "Return date, in format \"3-Aug-1998\", for DAYSAGO days ago."
   (require 'parse-time)
-  (defvar parse-time-months)
   (let* ((time (nnimap-time-substract (current-time) (days-to-time daysago)))
          (date (format-time-string
                 (format "%%d-%s-%%Y"