diff options
author | ShengHuo ZHU <zsh@cs.rochester.edu> | 2001-11-28 16:34:15 +0000 |
---|---|---|
committer | ShengHuo ZHU <zsh@cs.rochester.edu> | 2001-11-28 16:34:15 +0000 |
commit | 110b0624833a2a193383dc125545ac97feb05a3e (patch) | |
tree | f18eca6926d77ffd4fb491cdaa7e07f536499697 /lisp | |
parent | 40a60e9b7dcc5669a622f4a81a8962412950ae7d (diff) | |
download | emacs-110b0624833a2a193383dc125545ac97feb05a3e.tar.gz |
2001-11-28 ShengHuo ZHU <zsh@cs.rochester.edu>
* gnus-sum.el (gnus-summary-limit-to-author): The number of arguments.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
-rw-r--r-- | lisp/gnus/gnus-sum.el | 6 |
2 files changed, 7 insertions, 3 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 15c51391858..b98df260be4 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2001-11-28 ShengHuo ZHU <zsh@cs.rochester.edu> + + * gnus-sum.el (gnus-summary-limit-to-author): The number of arguments. + 2001-11-25 Stefan Monnier <monnier@cs.yale.edu> * imap.el (imap-interactive-login, imap-open, imap-authenticate): diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 470c7a9aa88..86e7d31b713 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el @@ -6413,15 +6413,15 @@ If NOT-MATCHING, excluding articles that have subjects that match a regexp." (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. |