[gnus git] branch master updated: m0-3-40-g0d85208 =1= nntp.el (nntp-send-authinfo): Work for secure nntp entry in authinfo.
Katsumi Yamaoka <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via 0d852088d91457ac4a08532ceb73f07aa1b37649 (commit)
from 0a43b4126dba7eeaf1bc0a69580fe79bc07fcd89 (commit)
- Log -----------------------------------------------------------------
commit 0d852088d91457ac4a08532ceb73f07aa1b37649
Author: Katsumi Yamaoka <[email protected]>
Date: Thu Feb 23 23:10:40 2012 +0000
nntp.el (nntp-send-authinfo): Work for secure nntp entry in authinfo.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 33d0f8d..0ee7614 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2012-02-23 Katsumi Yamaoka <[email protected]>
+
+ * nntp.el (nntp-send-authinfo): Work for secure nntp entry in authinfo.
+
2012-02-20 Lars Ingebrigtsen <[email protected]>
* gnus-start.el (gnus-clean-old-newsrc): Allow a FORCE parameter.
diff --git a/lisp/nntp.el b/lisp/nntp.el
index a9839a0..5bb908e 100644
--- a/lisp/nntp.el
+++ b/lisp/nntp.el
@@ -1194,10 +1194,13 @@ If SEND-IF-FORCE, only send authinfo to the server if the
(let* ((list (netrc-parse nntp-authinfo-file))
(alist (netrc-machine list nntp-address "nntp"))
(auth-info
- (nth 0 (auth-source-search :max 1
+ (nth 0 (auth-source-search
+ :max 1
:host (list nntp-address
(nnoo-current-server 'nntp))
- :port '("119" "nntp"))))
+ :port (or (cdr (assoc (format "%s" nntp-port-number)
+ '(("563" . ("563" "nntps" "snews")))))
+ '("119" "nntp")))))
(auth-user (plist-get auth-info :user))
(auth-force (plist-get auth-info :force))
(auth-passwd (plist-get auth-info :secret))
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/ChangeLog | 4 ++++
lisp/nntp.el | 11 +++++++----
2 files changed, 11 insertions(+), 4 deletions(-)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, master has been updated
hooks/post-receive
--
Gnus Project