From d93eb719c7af88fe70b1a0792b6b029d3ca715df Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Wed, 17 Dec 2014 14:12:06 -0800
Subject: [PATCH] gopher: fix query params for searching.

---
 extra/gopher/gopher.factor | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/extra/gopher/gopher.factor b/extra/gopher/gopher.factor
index 88dae14b2a..c5dec8b18e 100644
--- 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 -- )