2003-12-16 Per Abrahamsen <abraham@dina.kvl.dk>

	* nnmail.el (nnmail-split-fancy): The widget now supports
	restrictions.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 42ae134..05192e8 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-12-16  Per Abrahamsen  <abraham@dina.kvl.dk>
+
+       * nnmail.el (nnmail-split-fancy): The widget now supports
+       restrictions. 
+
 2003-12-16  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * nnheader.el (nnheader-find-etc-directory): Find the newest one.

diff --git a/lisp/nnmail.el b/lisp/nnmail.el
index 7b9bf4c..c5d9392 100644 (file)
--- a/lisp/nnmail.el
+++ b/lisp/nnmail.el
@@ -419,6 +419,11 @@ This is copy of the `lazy' widget in Emacs 21.4 provided for compatibility."
                             (choice :tag "Match"
                                     regexp 
                                     (symbol :value mail))
+                            (repeat :inline t
+                                    :tag "Restrictions"
+                                    (group :inline t
+                                           (const :format "" -)
+                                           regexp))
                             nnmail-split-fancy)
                       (const :tag "Junk (delete mail)" junk)))