emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master 4aafd19 2/4: Make `url-retrieve-synchronously' work


From: Katsumi Yamaoka
Subject: [Emacs-diffs] master 4aafd19 2/4: Make `url-retrieve-synchronously' work again with news:
Date: Sun, 15 Feb 2015 23:13:00 +0000

branch: master
commit 4aafd19a0e800607e36779f423052df8b7a84f5f
Author: Ivan Shmakov <address@hidden>
Commit: Katsumi Yamaoka <address@hidden>

    Make `url-retrieve-synchronously' work again with news:
    
    * lisp/gnus/nntp.el (nntp-open-server): Set variables in the correct buffer
    (bug#19583).
---
 lisp/gnus/ChangeLog |    5 +++++
 lisp/gnus/nntp.el   |    3 ++-
 2 files changed, 7 insertions(+), 1 deletions(-)

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index b9ae796..df33198 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2015-02-14  Ivan Shmakov  <address@hidden>
+
+       * nntp.el (nntp-open-server): Set variables in the correct buffer
+       (bug#19583).
+
 2015-02-14  Lars Ingebrigtsen  <address@hidden>
 
        * mm-decode.el (mm-head-p): New function.
diff --git a/lisp/gnus/nntp.el b/lisp/gnus/nntp.el
index 0891dba..a86f45e 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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]