Omit unreferenced GEN-DELIMS in url.scm.
authorTaylor R Campbell <campbell@mumble.net>
Thu, 28 Apr 2011 14:34:18 +0000 (14:34 +0000)
committerTaylor R Campbell <campbell@mumble.net>
Thu, 28 Apr 2011 14:34:18 +0000 (14:34 +0000)
src/runtime/url.scm

index a5d1f79c95bf695733544e883af1a11205aa15f0..d3471d0c9504145646c9e2ce423f7db105c47f3a 100644 (file)
@@ -915,8 +915,7 @@ USA.
        (char-set-union char-set:uri-alpha
                        char-set:uri-digit
                        (string->char-set "+-.")))
-  (let* ((gen-delims (string->char-set ":/?#[]@"))
-        (sub-delims (string->char-set "!$&'()*+,;="))
+  (let* ((sub-delims (string->char-set "!$&'()*+,;="))
         (unreserved
          (char-set-union char-set:uri-alpha
                          char-set:uri-digit