url-encode fix

diff --git a/extra/http/http.factor b/extra/http/http.factor
index a358c449af8a3fcf7b7074c8641c302a473c75fe..f6ea3d699f789865a05fa181854d9401ec0d852d 100644 (file)
--- a/extra/http/http.factor
+++ b/extra/http/http.factor
@@ -20,7 +20,7 @@ IN: http
     dup letter?
     over LETTER? or
     over digit? or
-    swap "/_?." member? or ; foldable
+    swap "/_-?." member? or ; foldable
 
 : url-encode ( str -- str )
     [