[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-sum.el

[ShengHuo ZHU]

Index: emacs/lisp/gnus/gnus-sum.el
diff -u emacs/lisp/gnus/gnus-sum.el:1.25 emacs/lisp/gnus/gnus-sum.el:1.26
--- emacs/lisp/gnus/gnus-sum.el:1.25    Sun Nov 25 10:17:24 2001
+++ emacs/lisp/gnus/gnus-sum.el Wed Nov 28 11:34:15 2001
@@ -6413,15 +6413,15 @@
          (gnus-summary-limit articles))
       (gnus-summary-position-point))))
 
-(defun gnus-summary-limit-to-author (from)
+(defun gnus-summary-limit-to-author (from &optional not-matching)
   "Limit the summary buffer to articles that have authors that match a regexp.
 If NOT-MATCHING, excluding articles that have authors that match a regexp."
   (interactive 
    (list (read-string (if current-prefix-arg
                          "Exclude author (regexp): "
                        "Limit to author (regexp): ")) 
-        nil current-prefix-arg))
-  (gnus-summary-limit-to-subject from "from"))
+        current-prefix-arg))
+  (gnus-summary-limit-to-subject from "from" not-matching))
 
 (defun gnus-summary-limit-to-age (age &optional younger-p)
   "Limit the summary buffer to articles that are older than (or equal) AGE 
days.