From 8ab85a703129739cb39b48bb4b2667e0fd573a08 Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Tue, 17 Feb 1998 06:02:16 +0000 Subject: [PATCH] *** empty log message *** --- lisp/ChangeLog | 9 +++++++++ lisp/gnus.el | 2 +- lisp/nnmail.el | 10 ++++------ texi/gnus.texi | 6 +++--- texi/message.texi | 6 +++--- 5 files changed, 20 insertions(+), 13 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3afc35aeb..60cdafbb1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,12 @@ +Tue Feb 17 07:00:43 1998 Lars Magne Ingebrigtsen + + * gnus.el: Quassia Gnus v0.29 is released. + +Tue Feb 17 06:15:03 1998 Lars Magne Ingebrigtsen + + * nnmail.el (nnmail-purge-split-history): List if alists, not + alist. + Mon Feb 16 20:22:04 1998 Lars Magne Ingebrigtsen * gnus.el: Quassia Gnus v0.28 is released. diff --git a/lisp/gnus.el b/lisp/gnus.el index aa6765493..edf5db63a 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el @@ -246,7 +246,7 @@ is restarted, and sometimes reloaded." :link '(custom-manual "(gnus)Exiting Gnus") :group 'gnus) -(defconst gnus-version-number "0.28" +(defconst gnus-version-number "0.29" "Version number for this version of Gnus.") (defconst gnus-version (format "Quassia Gnus v%s" gnus-version-number) diff --git a/lisp/nnmail.el b/lisp/nnmail.el index 1a8470f17..e326b09eb 100644 --- a/lisp/nnmail.el +++ b/lisp/nnmail.el @@ -1742,12 +1742,10 @@ If ARGS, PROMPT is used as an argument to `format'." (let ((history nnmail-split-history) prev) (while history - (if (string= (caar history) group) - (if prev - (setcdr prev (cdr history)) - (setq nnmail-split-history (cdr history))) - (setq prev history - history (cdr history)))))) + (setcar history (delete-if (lambda (e) (string= (car e) group)) + (car history))) + (pop history)) + (setq nnmail-split-history (delq nil nnmail-split-history)))) (defun nnmail-new-mail-p (group) "Say whether GROUP has new mail." diff --git a/texi/gnus.texi b/texi/gnus.texi index aa2d33016..067a28d6e 100644 --- a/texi/gnus.texi +++ b/texi/gnus.texi @@ -1,7 +1,7 @@ \input texinfo @c -*-texinfo-*- @setfilename gnus -@settitle Quassia Gnus 0.28 Manual +@settitle Quassia Gnus 0.29 Manual @synindex fn cp @synindex vr cp @synindex pg cp @@ -313,7 +313,7 @@ into another language, under the above conditions for modified versions. @tex @titlepage -@title Quassia Gnus 0.28 Manual +@title Quassia Gnus 0.29 Manual @author by Lars Magne Ingebrigtsen @page @@ -349,7 +349,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 Quassia Gnus 0.28. +This manual corresponds to Quassia Gnus 0.29. @end ifinfo diff --git a/texi/message.texi b/texi/message.texi index 96433a4cd..972f23814 100644 --- a/texi/message.texi +++ b/texi/message.texi @@ -1,7 +1,7 @@ \input texinfo @c -*-texinfo-*- @setfilename message -@settitle Message 0.28 Manual +@settitle Message 0.29 Manual @synindex fn cp @synindex vr cp @synindex pg cp @@ -39,7 +39,7 @@ into another language, under the above conditions for modified versions. @tex @titlepage -@title Message 0.28 Manual +@title Message 0.29 Manual @author by Lars Magne Ingebrigtsen @page @@ -80,7 +80,7 @@ Message mode buffers. * Key Index:: List of Message mode keys. @end menu -This manual corresponds to Message 0.28. Message is distributed with +This manual corresponds to Message 0.29. Message is distributed with the Gnus distribution bearing the same version number as this manual has. -- 2.25.1