original commit: 4313c2bbb11045726515cddab861a90451e2d81e
This commit is contained in:
Matthew Flatt 2004-09-10 00:26:40 +00:00
parent 8c7451273e
commit 8fb66d6b82

View File

@ -28,8 +28,6 @@
(let ([l (apply string-append (map cdr p))])
(test l uri-decode (uri-encode l)))))))
done
(let ()
(define (test-s->u vec str)
(define (string->url/vec str) (url->vec (string->url str)))