Revision: miles@gnu.org--gnu-2005/gnus--devo--0--patch-88

Merge from gnus--rel--5.10

Patches applied:

 * gnus--rel--5.10  (patch 57)

   - Update from CVS

005-04-04  Reiner Steib  <Reiner.Steib@gmx.de>

   * lisp/message.el (message-make-date): Revert previous change.

   * lisp/nnimap.el (nnimap-date-days-ago): Revert previous change and add
   defvars in order to silence the byte compiler inside the defun

   * lisp/gnus-demon.el (parse-time-string): Added autoload.

   * lisp/gnus-delay.el (parse-time-string): Added autoload.

   * lisp/gnus-art.el (parse-time-string): Added autoload.

2005-03-23  Lute Kamstra  <lute@gnu.org>

   * lisp/time-date.el: Add comment on time value formats.
   Don't require parse-time.
   (with-decoded-time-value): New macro.
   (encode-time-value): New function.
   (time-to-seconds, time-less-p, time-subtract, time-add): Use them.
   (days-to-time): Return a valid time value when arg is huge.
   (time-since): Use time-subtract.
   (time-to-number-of-days): Use time-to-seconds.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1e94356..37b9ecf 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,16 @@
 005-04-04  Reiner Steib  <Reiner.Steib@gmx.de>
 
+       * message.el (message-make-date): Revert previous change.
+
+       * nnimap.el (nnimap-date-days-ago): Revert previous change and add
+       defvars in order to silence the byte compiler inside the defun
+
+       * gnus-demon.el (parse-time-string): Added autoload.
+
+       * gnus-delay.el (parse-time-string): Added autoload.
+
+       * gnus-art.el (parse-time-string): Added autoload.
+
        * message.el (parse-time): Require for `parse-time-string'.
 
        * nnimap.el (parse-time): Require for `parse-time-string'.
@@ -34,6 +45,17 @@
 
        * nnmaildir.el: Replace `illegal' with `invalid'.
 
+2005-03-23  Lute Kamstra  <lute@gnu.org>
+
+       * time-date.el: Add comment on time value formats.
+       Don't require parse-time.
+       (with-decoded-time-value): New macro.
+       (encode-time-value): New function.
+       (time-to-seconds, time-less-p, time-subtract, time-add): Use them.
+       (days-to-time): Return a valid time value when arg is huge.
+       (time-since): Use time-subtract.
+       (time-to-number-of-days): Use time-to-seconds.
+
 2005-03-22  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * gnus-start.el (gnus-display-time-event-handler):

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index dcecf49..f8a3d68 100644 (file)
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -49,6 +49,7 @@
 (autoload 'gnus-msg-mail "gnus-msg" nil t)
 (autoload 'gnus-button-mailto "gnus-msg")
 (autoload 'gnus-button-reply "gnus-msg" nil t)
+(autoload 'parse-time-string "parse-time" nil nil)
 (autoload 'ansi-color-apply-on-region "ansi-color")
 
 (defgroup gnus-article nil

diff --git a/lisp/gnus-delay.el b/lisp/gnus-delay.el
index 02335e8..371d9e0 100644 (file)
--- a/lisp/gnus-delay.el
+++ b/lisp/gnus-delay.el
@@ -37,6 +37,7 @@
 
 (require 'nndraft)
 (require 'gnus-draft)
+(autoload 'parse-time-string "parse-time" nil nil)
 
 ;;;###autoload
 (defgroup gnus-delay nil

diff --git a/lisp/gnus-demon.el b/lisp/gnus-demon.el
index 5c011af..86ba34e 100644 (file)
--- a/lisp/gnus-demon.el
+++ b/lisp/gnus-demon.el
@@ -40,6 +40,8 @@
       (require 'timer-funcs)
     (require 'timer)))
 
+(autoload 'parse-time-string "parse-time" nil nil)
+
 (defgroup gnus-demon nil
   "Demonic behaviour."
   :group 'gnus)

diff --git a/lisp/message.el b/lisp/message.el
index 7958978..c1b9f92 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -47,7 +47,6 @@
 (require 'mail-parse)
 (require 'mml)
 (require 'rfc822)
-(require 'parse-time)
 
 (defgroup message '((user-mail-address custom-variable)
                    (user-full-name custom-variable))

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 682f44e..2b969f8 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -69,7 +69,6 @@
 (require 'gnus-range)
 (require 'gnus-start)
 (require 'gnus-int)
-(require 'parse-time)
 
 (eval-when-compile (require 'cl))
 
@@ -1445,6 +1444,8 @@ function is generally only called when Gnus is shutting down."
 
 (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"