X-Git-Url: https://git.cworth.org/git?p=obsolete%2Fnotmuch-old;a=blobdiff_plain;f=emacs%2Fnotmuch.el;h=c98a4febbf69f9dcc100aa8e2b3449d77a9ed89d;hp=63387a2dfe28c85fce445dc0a1f74d63498f3d0f;hb=401dbebd4803477563eff03d719605ed37a8e44d;hpb=c31a91bc5c270a9f416b63bb75c95f6274fce978 diff --git a/emacs/notmuch.el b/emacs/notmuch.el index 63387a2d..c98a4feb 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -654,11 +654,14 @@ of the result." ;; showing the search buffer (when (or (= exit-status 20) (= exit-status 21)) (kill-buffer)) - (condition-case nil + (condition-case err (notmuch-check-async-exit-status proc msg) ;; Suppress the error signal since strange - ;; things happen if a sentinel signals. - (error (throw 'return nil))) + ;; things happen if a sentinel signals. Mimic + ;; the top-level's handling of error messages. + (error + (message "%s" (second err)) + (throw 'return nil))) (if (and atbob (not (string= notmuch-search-target-thread "found"))) (set 'never-found-target-thread t)))))