From: Ivan Shmakov Date: Sun, 15 Feb 2015 23:08:03 +0000 (+0000) Subject: Make `url-retrieve-synchronously' work again with news: X-Git-Tag: emacs-25.0.90~2564^2~374 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4aafd19a0e800607e36779f423052df8b7a84f5f;p=emacs.git 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 b9ae796782d..df331984865 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/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/gnus/nntp.el b/lisp/gnus/nntp.el index 0891dba0387..a86f45e8bf3 100644 --- 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)