Mercurial > emacs
diff lisp/gnus/gnus-sum.el @ 56946:d7605794bc2b
(gnus-summary-search-article-forward):
Signal a specific `search-failed' rather than a generic `error'.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 07 Sep 2004 03:47:37 +0000 |
| parents | 55fd4f77387a |
| children | 46f0c98a04a2 cce1c0ee76ee |
line wrap: on
line diff
--- a/lisp/gnus/gnus-sum.el Tue Sep 07 03:47:29 2004 +0000 +++ b/lisp/gnus/gnus-sum.el Tue Sep 07 03:47:37 2004 +0000 @@ -8341,7 +8341,7 @@ (let ((gnus-last-article gnus-last-article)) (if (gnus-summary-search-article regexp backward) (gnus-summary-show-thread) - (error "Search failed: \"%s\"" regexp)))) + (signal 'search-failed (list regexp))))) (defun gnus-summary-search-article-backward (regexp) "Search for an article containing REGEXP backward."