*** empty log message ***
authorLars Magne Ingebrigtsen <larsi@gnus.org>
Tue, 17 Feb 1998 06:02:16 +0000 (06:02 +0000)
committerLars Magne Ingebrigtsen <larsi@gnus.org>
Tue, 17 Feb 1998 06:02:16 +0000 (06:02 +0000)
lisp/ChangeLog
lisp/gnus.el
lisp/nnmail.el
texi/gnus.texi
texi/message.texi

index 3afc35a..60cdafb 100644 (file)
@@ -1,3 +1,12 @@
+Tue Feb 17 07:00:43 1998  Lars Magne Ingebrigtsen  <larsi@menja.ifi.uio.no>
+
+       * gnus.el: Quassia Gnus v0.29 is released.
+
+Tue Feb 17 06:15:03 1998  Lars Magne Ingebrigtsen  <larsi@ifi.uio.no>
+
+       * nnmail.el (nnmail-purge-split-history): List if alists, not
+       alist. 
+
 Mon Feb 16 20:22:04 1998  Lars Magne Ingebrigtsen  <larsi@menja.ifi.uio.no>
 
        * gnus.el: Quassia Gnus v0.28 is released.
index aa67654..edf5db6 100644 (file)
@@ -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)
index 1a8470f..e326b09 100644 (file)
@@ -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."
index aa2d330..067a28d 100644 (file)
@@ -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
 
index 96433a4..972f238 100644 (file)
@@ -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.