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

urls: only create linked-hash if query is f.

db4
John Benediktsson 2015-11-19 08:50:30 -08:00
parent a3be724f5a
commit 6d21a5a073
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/urls/urls.factor
View File

@ -19,7 +19,7 @@ TUPLE: url protocol username password host port path query anchor ;
pick [ set-at ] [ delete-at drop ] if ; pick [ set-at ] [ delete-at drop ] if ;
: set-query-param ( url value key -- url ) : set-query-param ( url value key -- url )
pick query>> <linked-hash> or [ set-or-delete ] keep >>query ; pick query>> [ <linked-hash> ] unless* [ set-or-delete ] keep >>query ;
ERROR: malformed-port ; ERROR: malformed-port ;