From 8517a196f4110376ce769611594cd8692f72dc7c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Thu, 23 Jun 2022 04:21:16 +0200 Subject: Remove ->str and ->quoted-string. ->str as an alias of ->string is removed. ->string is however left. ->quoted-string was always weird, and was only used once. --- module/web/uri-query.scm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'module/web') diff --git a/module/web/uri-query.scm b/module/web/uri-query.scm index adf99803..e7cc627c 100644 --- a/module/web/uri-query.scm +++ b/module/web/uri-query.scm @@ -1,5 +1,4 @@ (define-module (web uri-query) - :use-module ((hnh util) :select (->quoted-string)) :use-module ((web uri) :select (uri-encode)) :export (encode-query-parameters) ) @@ -14,7 +13,7 @@ (map (lambda (p) (format #f "~a=~a" (car p) - (uri-encode (->quoted-string (cdr p))))) + (uri-encode (with-output-to-string (lambda () (write (cdr p))))))) parameters) "&")) -- cgit v1.2.3