Mercurial > emacs
changeset 23436:629892842585
(nntp-possibly-change-group): Allow for unexpected
responses to GROUP command, since this may be called from a timer
with quit inhibited.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 13 Oct 1998 03:24:50 +0000 |
| parents | dd68893482a9 |
| children | 62f74712cbd6 |
| files | lisp/gnus/nntp.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/nntp.el Mon Oct 12 23:15:16 1998 +0000 +++ b/lisp/gnus/nntp.el Tue Oct 13 03:24:50 1998 +0000 @@ -871,7 +871,9 @@ (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))))))