diff lisp/url/url-irc.el @ 57886:60d07d8a52e1

* url-imap.el (url-imap-open-host): Don't use `string-to-int'. The port returned by `url-port' is expected to be an integer. * url-irc.el (url-irc): Ditto. * url-news.el (url-news-open-host): Ditto. * url-nfs.el (url-nfs-build-filename): Ditto.

--- a/lisp/url/url-irc.el	Tue Nov 02 09:28:48 2004 +0000
+++ b/lisp/url/url-irc.el	Tue Nov 02 09:40:30 2004 +0000
@@ -61,7 +61,7 @@
 ;;;###autoload
 (defun url-irc (url)
   (let* ((host (url-host url))
-	 (port (string-to-int (url-port url)))
+	 (port (url-port url))
 	 (pass (url-password url))
 	 (user (url-user url))
 	 (chan (url-filename url)))