Mercurial > emacs

changeset 56946:d7605794bc2b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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 69f3d9a9952b
children a1a3a7ab3bad
files lisp/gnus/gnus-sum.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
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."