From ed74e197ee02a1b00ed8f0d079a4eda611a34ed4 Mon Sep 17 00:00:00 2001 From: mainzelm Date: Mon, 2 Feb 2004 17:37:01 +0000 Subject: [PATCH] The annotation of an address is not put into the URL so URI escaping it is superfluous and wrong. --- scheme/httpd/surflets/addresses.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scheme/httpd/surflets/addresses.scm b/scheme/httpd/surflets/addresses.scm index 68d6cb8..4f68406 100644 --- a/scheme/httpd/surflets/addresses.scm +++ b/scheme/httpd/surflets/addresses.scm @@ -55,7 +55,7 @@ (<= (length annotation) 1)) (let ((index (if (null? annotation) (address-add-annotation! address "") - (address-add-annotation! address (escape-uri (car annotation)))))) + (address-add-annotation! address (car annotation))))) (string-append message "?" (address-name address) "=" index))) ((eq? message 'address)