Diane Murray <disumu at x3y2z1.net>

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

diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index 7fc6fdb..6cdf672 100644 (file)
--- 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 a793cac..f707264 100644 (file)
--- 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)