(gnus-uu-save-article): Use `message-make-date'

instead of `current-time-string' as the latter creates a time
string that is not RFC 2822 compliant (it lacks the zone).
Update copyright notice.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9862e2c..0b6c749 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2005-07-16  Romain Francoise  <romain@orebokech.com>
+
+       * gnus-uu.el (gnus-uu-save-article): Use `message-make-date'
+       instead of `current-time-string' as the latter creates a time
+       string that is not RFC 2822 compliant (it lacks the zone).
+       Update copyright notice.
+

 2005-07-15  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * gnus-art.el (gnus-article-next-page): Use gnus-end-of-window.
 2005-07-15  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * gnus-art.el (gnus-article-next-page): Use gnus-end-of-window.

diff --git a/lisp/gnus-uu.el b/lisp/gnus-uu.el
index bdecfbf..8fc9ccb 100644 (file)
--- a/lisp/gnus-uu.el
+++ b/lisp/gnus-uu.el
@@ -1,6 +1,6 @@
 ;;; gnus-uu.el --- extract (uu)encoded files in Gnus
 ;; Copyright (C) 1985, 1986, 1987, 1993, 1994, 1995, 1996, 1997, 1998, 2000,
 ;;; gnus-uu.el --- extract (uu)encoded files in Gnus
 ;; Copyright (C) 1985, 1986, 1987, 1993, 1994, 1995, 1996, 1997, 1998, 2000,

-;;        2001, 2002, 2003, 2004 Free Software Foundation, Inc.
+;;        2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.

 
 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
 ;; Created: 2 Oct 1993
 
 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
 ;; Created: 2 Oct 1993


@@ -845,7 +845,7 @@ When called interactively, prompt for REGEXP."
              (erase-buffer)
              (insert (format
                       "Date: %s\nFrom: %s\nSubject: %s Digest\n\n"
              (erase-buffer)
              (insert (format
                       "Date: %s\nFrom: %s\nSubject: %s Digest\n\n"

-                      (current-time-string) name name))
+                      (message-make-date) name name))

              (when (and message-forward-as-mime gnus-uu-digest-buffer)
                (insert "<#part type=message/rfc822>\nSubject: Topics\n\n"))
              (insert "Topics:\n")))
              (when (and message-forward-as-mime gnus-uu-digest-buffer)
                (insert "<#part type=message/rfc822>\nSubject: Topics\n\n"))
              (insert "Topics:\n")))