From ca4ff364b9be7865ccee20f8b5159be297a58aa5 Mon Sep 17 00:00:00 2001 From: Ivan Shmakov Date: Sat, 14 Feb 2015 16:24:08 +1100 Subject: [PATCH] Make `url-retrieve-synchronously' work again with news: * nntp.el (nntp-open-server): Set variables in the correct buffer (bug#19583). --- lisp/ChangeLog | 5 +++++ lisp/nntp.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 9f93a3031..c22fcc362 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2015-02-14 Ivan Shmakov + + * nntp.el (nntp-open-server): Set variables in the correct buffer + (bug#19583). + 2015-02-14 Lars Ingebrigtsen * mm-decode.el (mm-head-p): New function. diff --git a/lisp/nntp.el b/lisp/nntp.el index 0891dba03..a86f45e8b 100644 --- a/lisp/nntp.el +++ b/lisp/nntp.el @@ -1066,7 +1066,8 @@ command whose response triggered the error." (setq defs (cons (list 'nntp-port-number (car defs)) (cdr defs)))) (unless (assq 'nntp-address defs) (setq defs (append defs (list (list 'nntp-address server))))) - (nnoo-change-server 'nntp server defs) + (with-current-buffer nntp-server-buffer + (nnoo-change-server 'nntp server defs)) (if connectionless t (or (nntp-find-connection nntp-server-buffer) -- 2.25.1