From 4c8a462f47791317a6f8a06fe7f0374905ac0132 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 15 Jun 1999 04:27:45 +0000 Subject: [PATCH] Importing Pterodactyl Gnus v0.88. --- lisp/ChangeLog | 11 +++++++++++ lisp/gnus-sum.el | 3 ++- lisp/gnus.el | 2 +- lisp/nnmail.el | 2 +- texi/gnus.texi | 6 +++--- texi/message.texi | 6 +++--- 6 files changed, 21 insertions(+), 9 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 218520e..d27d230 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,14 @@ +Tue Jun 15 04:13:01 1999 Lars Magne Ingebrigtsen + + * gnus.el: Pterodactyl Gnus v0.88 is released. + +1999-06-15 04:13:45 Lars Magne Ingebrigtsen + + * gnus-sum.el (gnus-summary-save-parts): Destroy handles after + usage. + + * nnmail.el (nnmail-get-new-mail): Save info. + Mon Jun 14 01:15:59 1999 Lars Magne Ingebrigtsen * gnus.el: Pterodactyl Gnus v0.87 is released. diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el index 16eb139..8c85fb3 100644 --- a/lisp/gnus-sum.el +++ b/lisp/gnus-sum.el @@ -8898,7 +8898,8 @@ If REVERSE, save parts that do not match TYPE." (set-buffer gnus-article-buffer) (let ((handles (or (mm-dissect-buffer) (mm-uu-dissect)))) (when handles - (gnus-summary-save-parts-1 type dir handles reverse)))))) + (gnus-summary-save-parts-1 type dir handles reverse) + (mm-destroy-parts handles)))))) (defun gnus-summary-save-parts-1 (type dir handle reverse) (if (stringp (car handle)) diff --git a/lisp/gnus.el b/lisp/gnus.el index 8a85814..2f5c730 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el @@ -260,7 +260,7 @@ is restarted, and sometimes reloaded." :link '(custom-manual "(gnus)Exiting Gnus") :group 'gnus) -(defconst gnus-version-number "0.87" +(defconst gnus-version-number "0.88" "Version number for this version of Gnus.") (defconst gnus-version (format "Pterodactyl Gnus v%s" gnus-version-number) diff --git a/lisp/nnmail.el b/lisp/nnmail.el index 9877077..da30814 100644 --- a/lisp/nnmail.el +++ b/lisp/nnmail.el @@ -1413,7 +1413,7 @@ See the documentation for the variable `nnmail-split-fancy' for documentation." (incf total new) (incf i)))) ;; If we did indeed read any incoming spools, we save all info. - (unless (zerop new) + (unless (zerop total) (nnmail-save-active (nnmail-get-value "%s-group-alist" method) (nnmail-get-value "%s-active-file" method)) diff --git a/texi/gnus.texi b/texi/gnus.texi index 7101c0c..b326521 100644 --- a/texi/gnus.texi +++ b/texi/gnus.texi @@ -1,7 +1,7 @@ @c \input texinfo @c -*-texinfo-*- @setfilename gnus -@settitle Pterodactyl Gnus 0.87 Manual +@settitle Pterodactyl Gnus 0.88 Manual @synindex fn cp @synindex vr cp @synindex pg cp @@ -319,7 +319,7 @@ into another language, under the above conditions for modified versions. @tex @titlepage -@title Pterodactyl Gnus 0.87 Manual +@title Pterodactyl Gnus 0.88 Manual @author by Lars Magne Ingebrigtsen @page @@ -355,7 +355,7 @@ can be gotten by any nefarious means you can think of---@sc{nntp}, local spool or your mbox file. All at the same time, if you want to push your luck. -This manual corresponds to Pterodactyl Gnus 0.87. +This manual corresponds to Pterodactyl Gnus 0.88. @end ifinfo diff --git a/texi/message.texi b/texi/message.texi index 60168a8..21b04df 100644 --- a/texi/message.texi +++ b/texi/message.texi @@ -1,7 +1,7 @@ \input texinfo @c -*-texinfo-*- @setfilename message -@settitle Pterodactyl Message 0.87 Manual +@settitle Pterodactyl Message 0.88 Manual @synindex fn cp @synindex vr cp @synindex pg cp @@ -42,7 +42,7 @@ into another language, under the above conditions for modified versions. @tex @titlepage -@title Pterodactyl Message 0.87 Manual +@title Pterodactyl Message 0.88 Manual @author by Lars Magne Ingebrigtsen @page @@ -83,7 +83,7 @@ Message mode buffers. * Key Index:: List of Message mode keys. @end menu -This manual corresponds to Pterodactyl Message 0.87. Message is +This manual corresponds to Pterodactyl Message 0.88. Message is distributed with the Gnus distribution bearing the same version number as this manual. -- 1.7.10.4