From abc40aabb9c8b3898029ebeb081510b4c6c993d5 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 7 Sep 2004 03:47:37 +0000 Subject: [PATCH] (gnus-summary-search-article-forward): Signal a specific `search-failed' rather than a generic `error'. --- lisp/gnus/gnus-sum.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index af5a2362194..77d5037b32d 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el @@ -8341,7 +8341,7 @@ If BACKWARD, search backward instead." (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." -- 2.39.2