steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

urls.encoding: preserve order of URL query parameters.

db4
John Benediktsson 2015-11-04 08:36:56 -08:00
parent 40d454758e
commit f7b7b5afbf
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/urls/encoding/encoding.factor
View File

@ -1,8 +1,8 @@
! Copyright (C) 2008, 2010 Slava Pestov. ! Copyright (C) 2008, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: arrays ascii assocs combinators combinators.short-circuit USING: arrays ascii assocs combinators combinators.short-circuit
fry io.encodings.string io.encodings.utf8 kernel make math fry io.encodings.string io.encodings.utf8 kernel linked-assocs
math.parser present sequences splitting strings ; make math math.parser present sequences splitting strings ;
IN: urls.encoding IN: urls.encoding
: url-quotable? ( ch -- ? ) : url-quotable? ( ch -- ? )
@ -92,7 +92,7 @@ PRIVATE>
: query>assoc ( query -- assoc ) : query>assoc ( query -- assoc )
dup [ dup [
"&;" split H{ } clone [ "&;" split <linked-hash> [
[ [
[ "=" split1 [ dup [ query-decode ] when ] bi@ swap ] dip [ "=" split1 [ dup [ query-decode ] when ] bi@ swap ] dip
add-query-param add-query-param