(nnimap-open-connection): Add "143" and "993" as default ports to the calls to

`netrc-machine-user-or-password' in addition to "imap" and "imaps".

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6a05bb1..bcf26f9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2008-02-07  Tassilo Horn  <tassilo@member.fsf.org>
+
+       * nnimap.el (nnimap-open-connection): Add "143" and "993" as default
+       ports to the calls to `netrc-machine-user-or-password' in addition to
+       "imap" and "imaps".
+
 2008-02-03  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * gnus.el (gnus-group-startup-message): Add `find-image' call before

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index e1b1265..c1b7b88 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -802,7 +802,7 @@ If EXAMINE is non-nil the group is selected read-only."
                        (or nnimap-server-address
                            nnimap-address))
                  (list port)
-                 (list "imap" "imaps")))
+                 (list "imap" "imaps" "143" "993")))
           (passwd (netrc-machine-user-or-password
                    "password"
                    list
@@ -810,7 +810,7 @@ If EXAMINE is non-nil the group is selected read-only."
                          (or nnimap-server-address
                              nnimap-address))
                    (list port)
-                   (list "imap" "imaps"))))
+                   (list "imap" "imaps" "143" "993"))))
       (if (imap-authenticate user passwd nnimap-server-buffer)
          (prog2
              (setq nnimap-server-buffer-alist