[Emacs-diffs] Changes to emacs/lisp/net/netrc.el,v

[Miles Bader]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Miles Bader <miles>     08/05/22 05:03:01

Index: net/netrc.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/net/netrc.el,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -b -r1.15 -r1.16
--- net/netrc.el        6 May 2008 07:31:46 -0000       1.15
+++ net/netrc.el        22 May 2008 05:03:00 -0000      1.16
@@ -137,8 +137,10 @@
       (while (and result
                  (not (netrc-port-equal
                        (or port defaultport "nntp")
+                       ;; when port is not given in the netrc file,
+                       ;; it should mean "any port"
                        (or (netrc-get (car result) "port")
-                           defaultport "nntp"))))
+                           defaultport port))))
        (pop result))
       (car result))))