gopher: fix query params for searching.

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