gopher: fix query params for searching.

db4
John Benediktsson 2014-12-17 14:12:06 -08:00
parent cc625546c0
commit d93eb719c7
1 changed files with 2 additions and 1 deletions

View File

@ -6,7 +6,7 @@ formatting fry images images.loader images.loader.private
images.viewer io io.encodings.binary io.encodings.string images.viewer io io.encodings.binary io.encodings.string
io.encodings.utf8 io.sockets io.styles kernel make math io.encodings.utf8 io.sockets io.styles kernel make math
math.parser namespaces present prettyprint sequences splitting math.parser namespaces present prettyprint sequences splitting
summary urls vocabs ; summary urls urls.encoding vocabs ;
IN: gopher IN: gopher
@ -94,6 +94,7 @@ ERROR: not-a-gopher-url url ;
[ host>> ] [ host>> ]
[ port>> 70 or <inet> binary ] [ port>> 70 or <inet> binary ]
[ path>> rest ] [ path>> rest ]
[ query>> assoc>query url-decode "?" glue ]
} cleave '[ _ get-selector ] with-client ; } cleave '[ _ get-selector ] with-client ;
: gopher. ( url -- ) : gopher. ( url -- )