URI query tags case-sensitive

svn: r262 original commit: de84c91d1aa1d1a205cf5b77b35d48c22f6c6fbe
2005-06-28 19:57:19 +00:00 · 2005-06-28 19:57:19 +00:00 · 7032aa0610
commit 7032aa0610
parent f5ea87030c
1 changed files with 0 additions and 1 deletions
--- a/collects/net/uri-codec-unit.ss
+++ b/collects/net/uri-codec-unit.ss
@ -247,7 +247,6 @@
 		(match (regexp-match-positions key-regexp str start)
 		  [((start . end))
 		   (vector (let ([s (form-urlencoded-decode (substring str start end))])
-			     (string-lowercase! s)
 			     (string->symbol s))
 			   (add1 end))]
 		  [#f #f])))