Diane Murray <disumu at x3y2z1.net>

(url-generic-emulator-loader): Send the port as a string to
`url-do-terminal-emulator'.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index e7b441bf55e..05be493b74e 100644
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -1,3 +1,8 @@
+2007-09-22  Diane Murray  <disumu@x3y2z1.net>
+
+        * url-misc.el (url-generic-emulator-loader): Send the port as a
+        string to `url-do-terminal-emulator'.
+
 2007-09-21  Diane Murray  <disumu@x3y2z1.net>
 
         * url-news.el (url-news-fetch-newsgroup): Fix formatting of Gnus
diff --git a/lisp/url/url-misc.el b/lisp/url/url-misc.el
index a793cacc5bc..f70726407d3 100644
--- a/lisp/url/url-misc.el
+++ b/lisp/url/url-misc.el
@@ -75,7 +75,7 @@
   (let* ((type (intern (downcase (url-type url))))
          (server (url-host url))
          (name (url-user url))
-         (port (url-port url)))
+         (port (number-to-string (url-port url))))
     (url-do-terminal-emulator type server port name))
   nil)