/[emacs]/emacs/lisp/url/url-imap.el
ViewVC logotype

Diff of /emacs/lisp/url/url-imap.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3.4.1 by miles, Fri Oct 22 10:13:34 2004 UTC revision 1.3.4.2 by miles, Thu Nov 4 08:55:37 2004 UTC
# Line 47  Line 47 
47    (let ((imap-username user)    (let ((imap-username user)
48          (imap-password pass)          (imap-password pass)
49          (authenticator (if user 'login 'anonymous)))          (authenticator (if user 'login 'anonymous)))
     (if (stringp port)  
         (setq port (string-to-int port)))  
50      (nnimap-open-server host      (nnimap-open-server host
51                          `((nnimap-server-port ,port)                          `((nnimap-server-port ,port)
52                            (nnimap-stream 'network)                            (nnimap-stream 'network)

Legend:
Removed from v.1.3.4.1  
changed lines
  Added in v.1.3.4.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26