From: Eric Abrahamsen <eric@ericabrahamsen.net>
Date: Sun, 16 May 2021 17:20:43 +0000 (-0700)
Subject: Use condition-case-unless-debug in nnselect-run
X-Git-Tag: emacs-28.0.90~2448
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0212fb180a118795b4de383cc712e7079c998cef;p=emacs.git

Use condition-case-unless-debug in nnselect-run

* lisp/gnus/nnselect.el (nnselect-run): This is confusing for users,
make it more yielding to common debugging strategies.
---

diff --git a/lisp/gnus/nnselect.el b/lisp/gnus/nnselect.el
index 5ac4c3a64e1..ecec705b326 100644
--- a/lisp/gnus/nnselect.el
+++ b/lisp/gnus/nnselect.el
@@ -777,7 +777,7 @@ If this variable is nil, or if the provided function returns nil,
 Return an article list."
   (let ((func (alist-get 'nnselect-function specs))
 	(args (alist-get 'nnselect-args specs)))
-    (condition-case err
+    (condition-case-unless-debug err
 	(funcall func args)
       (error (gnus-error 3 "nnselect-run: %s on %s gave error %s" func args err)
 	     []))))