Make `url-retrieve-synchronously' work again with news:

* lisp/gnus/nntp.el (nntp-open-server): Set variables in the correct buffer
(bug#19583).

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index b9ae796782d6242cda5bd373a551afc8bf21d0e2..df331984865fd5650656323931bfada342d49ffe 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2015-02-14  Ivan Shmakov  <ivan@siamics.net>
+
+       * nntp.el (nntp-open-server): Set variables in the correct buffer
+       (bug#19583).
+
 2015-02-14  Lars Ingebrigtsen  <larsi@gnus.org>
 
        * mm-decode.el (mm-head-p): New function.

diff --git a/lisp/gnus/nntp.el b/lisp/gnus/nntp.el
index 0891dba0387d41631f2ede65f1f775c47e8075b9..a86f45e8bf319091db3d831e510412219cbfd1d2 100644 (file)
--- a/lisp/gnus/nntp.el
+++ b/lisp/gnus/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)