From: Taylor R Campbell <campbell@mumble.net>
Date: Thu, 28 Apr 2011 14:34:18 +0000 (+0000)
Subject: Omit unreferenced GEN-DELIMS in url.scm.
X-Git-Tag: 20110609-Gtk~16^2~5
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=bd6b05b8486d520449378abdda46d359900c2349;p=mit-scheme.git

Omit unreferenced GEN-DELIMS in url.scm.
---

diff --git a/src/runtime/url.scm b/src/runtime/url.scm
index a5d1f79c9..d3471d0c9 100644
--- a/src/runtime/url.scm
+++ b/src/runtime/url.scm
@@ -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