diff options
| author | Yuuki Harano <masm+github@masm11.me> | 2021-12-06 00:37:01 +0900 |
|---|---|---|
| committer | Yuuki Harano <masm+github@masm11.me> | 2021-12-06 00:37:01 +0900 |
| commit | e5f74cecf132eb266abbaf7483bd793f45cc370f (patch) | |
| tree | 5c58e97632e36aa3bf6e7133c4bcc1e57e33afce /lisp/gnus/gnus-search.el | |
| parent | 6d7a1123b44ecc4b0f5f356df1eaea0b74e1e855 (diff) | |
| parent | 622550f7187f5ec9261a0d30b5ee6f440069a1e0 (diff) | |
| download | emacs-e5f74cecf132eb266abbaf7483bd793f45cc370f.tar.gz emacs-e5f74cecf132eb266abbaf7483bd793f45cc370f.tar.bz2 emacs-e5f74cecf132eb266abbaf7483bd793f45cc370f.zip | |
Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs into feature/pgtk
Diffstat (limited to 'lisp/gnus/gnus-search.el')
| -rw-r--r-- | lisp/gnus/gnus-search.el | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/lisp/gnus/gnus-search.el b/lisp/gnus/gnus-search.el index bce5d57c521..c77de688e66 100644 --- a/lisp/gnus/gnus-search.el +++ b/lisp/gnus/gnus-search.el @@ -105,9 +105,13 @@ (gnus-add-shutdown #'gnus-search-shutdown 'gnus) -(define-error 'gnus-search-parse-error "Gnus search parsing error") +(define-error 'gnus-search-error "Gnus search error") -(define-error 'gnus-search-config-error "Gnus search configuration error") +(define-error 'gnus-search-parse-error "Gnus search parsing error" + 'gnus-search-error) + +(define-error 'gnus-search-config-error "Gnus search configuration error" + 'gnus-search-error) ;;; User Customizable Variables: @@ -1927,7 +1931,7 @@ Assume \"size\" key is equal to \"larger\"." (apply #'nnheader-message 4 "Search engine for %s improperly configured: %s" server (cdr err)) - (signal 'gnus-search-config-error err))))) + (signal (car err) (cdr err)))))) (alist-get 'search-group-spec specs)) ;; Some search engines do their own limiting, but some don't, so ;; do it again here. This is bad because, if the user is |