(nntp-possibly-change-group): Allow for unexpected

responses to GROUP command, since this may be called from a timer
with quit inhibited.

1 files changed, 3 insertions, 1 deletions

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))))))