suzanne.soy/compatibility
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

.

Browse Source 
original commit: 7697dcbbc4bc226ba54dba9cf53c064c9cf5667f
This commit is contained in:
Matthew Flatt 2003-06-10 16:34:08 +00:00
parent 1c5d419c78
commit 18e2f4b738
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/net/url-unit.ss
View File

@ -485,7 +485,7 @@
;; but the URL is missing a "/" at the end. ;; but the URL is missing a "/" at the end.
(if (and (string=? path "") (if (and (string=? path "")
host) host)
path ; "/" "/"
path)) path))
(get-str 8 1 0) ; params (get-str 8 1 0) ; params
(get-str 9 1 0) ; query (get-str 9 1 0) ; query