summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/url/ChangeLog5
-rw-r--r--lisp/url/url-misc.el2
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)