PR7576

svn: r833
2005-09-11 17:43:23 +00:00 · 2005-09-11 17:43:23 +00:00 · 8572e70968
commit 8572e70968
parent 700c36eccd
1 changed files with 1 additions and 1 deletions
--- a/collects/net/url-unit.ss
+++ b/collects/net/url-unit.ss
@ -72,7 +72,7 @@
                (fragment (url-fragment url)))
            (cond
             ((and scheme (string=? scheme "file"))
-              (string-append "file:" path
+              (string-append "file:" (combine-path-strings path)
                             (or (and (not fragment) "")
                                 (string-append "#" fragment))))
             (else