From 66bd5242de02ed66b7ba8a98dae44a7aed60e350 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 13 Oct 1998 03:24:50 +0000 Subject: [PATCH] (nntp-possibly-change-group): Allow for unexpected responses to GROUP command, since this may be called from a timer with quit inhibited. --- lisp/gnus/nntp.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/nntp.el b/lisp/gnus/nntp.el index 4067d566eb6..4a82b036dd7 100644 --- a/lisp/gnus/nntp.el +++ b/lisp/gnus/nntp.el @@ -871,7 +871,9 @@ This function is supposed to be called from `nntp-server-opened-hook'." (set-buffer (process-buffer (car entry))) (erase-buffer) (nntp-send-string (car entry) (concat "GROUP " group)) - (nntp-wait-for-string "^2.*\n") + ;; allow for unexpected responses, since this can be called + ;; from a timer with quit inhibited + (nntp-wait-for-string "^[245].*\n") (setcar (cddr entry) group) (erase-buffer)))))) -- 2.39.2