Mercurial > emacs

diff lisp/gnus/nnimap.el @ 110219:cee903f20270

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
nnimap.el (nnimap-open-connection): Revert the change that would look into authinfo for imaps instead of imap.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Mon, 06 Sep 2010 00:33:15 +0000
parents 1a9f718ae483
children f2e111723c3a
line wrap: on
line diff
--- a/lisp/gnus/nnimap.el	Mon Sep 06 00:20:42 2010 +0000
+++ b/lisp/gnus/nnimap.el	Mon Sep 06 00:33:15 2010 +0000
@@ -833,13 +833,9 @@
     (let* ((list (progn (gnus-message 7 "Parsing authinfo file `%s'."
 				      nnimap-authinfo-file)
 			(netrc-parse nnimap-authinfo-file)))
-	   (port (cond
-		  (nnimap-server-port
-		   (int-to-string nnimap-server-port))
-		  ((eq nnimap-stream 'ssl)
-		   "imaps")
-		  (t
-		   "imap")))
+ 	   (port (if nnimap-server-port
+		     (int-to-string nnimap-server-port)
+		   "imap"))
 	   (auth-info
 	    (auth-source-user-or-password '("login" "password") server port))
 	   (auth-user (nth 0 auth-info))