From cd0f48fcb0ce043a7894932fa762690cb3fd0905 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 26 Aug 1997 22:11:25 +0000 Subject: [PATCH] (gnus-select-method): Change the other ignore-errors. --- lisp/gnus/gnus.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el index e73b3f4438a..0d73ceecbfe 100644 --- a/lisp/gnus/gnus.el +++ b/lisp/gnus/gnus.el @@ -775,8 +775,9 @@ used to 899, you would say something along these lines: (defcustom gnus-select-method (condition-case nil (nconc - (list 'nntp (or (ignore-errors - (gnus-getenv-nntpserver)) + (list 'nntp (or (condition-case nil + (gnus-getenv-nntpserver) + (error nil)) (when (and gnus-default-nntp-server (not (string= gnus-default-nntp-server ""))) gnus-default-nntp-server) -- 2.39.5