diff --git a/basis/xml/entities/entities-docs.factor b/basis/xml/entities/entities-docs.factor index 791a0828cb..98b5fa77ba 100644 --- a/basis/xml/entities/entities-docs.factor +++ b/basis/xml/entities/entities-docs.factor @@ -19,5 +19,5 @@ HELP: entities { $see-also with-entities } ; HELP: with-entities -{ $values { "entities" "a hash table of strings to strings" } { "quot" "a quotation ( -- )" } } +{ $values { "entities" "a hash table of strings to strings" } { "quot" { $quotation ( -- ) } } } { $description "Calls the quotation using the given table of entity values (symbolizing, eg, that " { $snippet "&foo;" } " represents " { $snippet "\"a\"" } ") on top of the default XML entities" } ; diff --git a/basis/xml/xml-docs.factor b/basis/xml/xml-docs.factor index 3ea09e09ec..6318cec93f 100644 --- a/basis/xml/xml-docs.factor +++ b/basis/xml/xml-docs.factor @@ -28,7 +28,7 @@ HELP: read-xml-chunk { $see-also read-xml } ; HELP: each-element -{ $values { "stream" "an input stream" } { "quot" "a quotation ( xml-elem -- )" } } +{ $values { "stream" "an input stream" } { "quot" { $quotation ( xml-elem -- ) } } } { $description "Parses the XML document, and whenever an event is encountered (a tag piece, comment, parsing instruction, directive or string element), the quotation is called with that event on the stack. The quotation has all responsibility to deal with the event properly. The encoding of the stream is automatically detected, so a binary input stream should be used." } { $see-also read-xml } ;