The annotation of an address is not put into the URL so URI escaping

it is superfluous and wrong.
This commit is contained in:
mainzelm 2004-02-02 17:37:01 +00:00
parent bf44e9d93d
commit ed74e197ee
1 changed files with 1 additions and 1 deletions

View File

@ -55,7 +55,7 @@
(<= (length annotation) 1)) (<= (length annotation) 1))
(let ((index (if (null? annotation) (let ((index (if (null? annotation)
(address-add-annotation! address "") (address-add-annotation! address "")
(address-add-annotation! address (escape-uri (car annotation)))))) (address-add-annotation! address (car annotation)))))
(string-append message "?" (address-name address) (string-append message "?" (address-name address)
"=" index))) "=" index)))
((eq? message 'address) ((eq? message 'address)