T-gnus 6.16.6 revision 00.

diff --git a/ChangeLog b/ChangeLog
index 3ebc9c4..ea338cb 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2004-01-04  Katsumi Yamaoka  <yamaoka@jpl.org>
 
+       * lisp/gnus-vers.el: T-gnus 6.16.6 revision 00.
+
+2004-01-04  Katsumi Yamaoka  <yamaoka@jpl.org>
+
        * lisp/gnus-vers.el: T-gnus 6.16.5 revision 00.
 
 2004-01-04  Katsumi Yamaoka  <yamaoka@jpl.org>

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7ad93f5..f2f699f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2004-01-04 Lars Magne Ingebrigtsen <lars@ingebrigtsen.no>
+
+       * gnus.el: Gnus v5.10.6 is released.
+
+2004-01-04  Kai Grossjohann  <kai@emptydomain.de>
+
+       * gnus-sum.el (gnus-summary-print-article): Doc fix.
+
 2004-01-04  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * gnus.el (gnus-version-number): Bump.

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 2dd2bd4..a8938f3 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -8648,10 +8648,16 @@ article.  If BACKWARD (the prefix) is non-nil, search backward instead."
                          "[()]" "\\\\\\&"))
 
 (defun gnus-summary-print-article (&optional filename n)
-  "Generate and print a PostScript image of the N next (mail) articles.
+  "Generate and print a PostScript image of the process-marked (mail) articles.
 
-If N is negative, print the N previous articles.  If N is nil and articles
-have been marked with the process mark, print these instead.
+If used interactively, print the current article if none are
+process-marked.  With prefix arg, prompt the user for the name of the
+file to save in.
+
+When used from Lisp, accept two optional args FILENAME and N.  N means
+to print the next N articles.  If N is negative, print the N previous
+articles.  If N is nil and articles have been marked with the process
+mark, print these instead.
 
 If the optional first argument FILENAME is nil, send the image to the
 printer.  If FILENAME is a string, save the PostScript image in a file with

diff --git a/lisp/mail-source.el b/lisp/mail-source.el
index 0942443..061530e 100644 (file)
--- a/lisp/mail-source.el
+++ b/lisp/mail-source.el
@@ -262,7 +262,7 @@ If non-nil, this maildrop will be checked periodically for new mail."
   :group 'mail-source
   :type 'integer)
 
-(defcustom mail-source-delete-incoming nil
+(defcustom mail-source-delete-incoming t
   "*If non-nil, delete incoming files after handling.
 If t, delete immediately, if nil, never delete.  If a positive number, delete
 files older than number of days."