From 7032aa061006f372b5ff11ce388ccc9848886103 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 28 Jun 2005 19:57:19 +0000
Subject: [PATCH] URI query tags case-sensitive

svn: r262

original commit: de84c91d1aa1d1a205cf5b77b35d48c22f6c6fbe
---
 collects/net/uri-codec-unit.ss | 1 -
 1 file changed, 1 deletion(-)

diff --git a/collects/net/uri-codec-unit.ss b/collects/net/uri-codec-unit.ss
index acbf0e3..5c141f5 100644
--- 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])))