Fix help lint

db4
Slava Pestov 2008-09-29 22:16:55 -05:00
parent fd7b7511f5
commit 90eaffe40c
2 changed files with 5 additions and 5 deletions

View File

@ -19,10 +19,10 @@ HELP: assoc>query
{ $notes "This word is used by the implementation of " { $link "urls" } ". It is also used by the HTTP client to encode POST requests." } { $notes "This word is used by the implementation of " { $link "urls" } ". It is also used by the HTTP client to encode POST requests." }
{ $examples { $examples
{ $example { $example
"USING: io urls ;" "USING: io urls.encoding ;"
"{ { \"from\" \"Lead\" } { \"to\" \"Gold, please\" } }" "{ { \"from\" \"Lead\" } { \"to\" \"Gold, please\" } }"
"assoc>query print" "assoc>query print"
"from=Lead&to=Gold%2c+please" "from=Lead&to=Gold%2c%20please"
} }
} ; } ;
@ -32,7 +32,7 @@ HELP: query>assoc
{ $notes "This word is used by the implementation of " { $link "urls" } ". It is also used by the HTTP server to parse POST requests." } { $notes "This word is used by the implementation of " { $link "urls" } ". It is also used by the HTTP server to parse POST requests." }
{ $examples { $examples
{ $unchecked-example { $unchecked-example
"USING: prettyprint urls ;" "USING: prettyprint urls.encoding ;"
"\"gender=female&agefrom=22&ageto=28&location=Omaha+NE\"" "\"gender=female&agefrom=22&ageto=28&location=Omaha+NE\""
"query>assoc ." "query>assoc ."
<" H{ <" H{

View File

@ -2,8 +2,8 @@
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: kernel ascii combinators combinators.short-circuit USING: kernel ascii combinators combinators.short-circuit
sequences splitting fry namespaces make assocs arrays strings sequences splitting fry namespaces make assocs arrays strings
io.sockets io.sockets.secure io.encodings.string io.encodings.string io.encodings.utf8 math math.parser accessors
io.encodings.utf8 math math.parser accessors hashtables present ; hashtables present ;
IN: urls.encoding IN: urls.encoding
: url-quotable? ( ch -- ? ) : url-quotable? ( ch -- ? )