-USING: accessors arrays combinators definitions generalizations
-help help.markup help.topics kernel sequences sorting vocabs
-words combinators.smart tools.crossref ;
+USING: accessors arrays combinators combinators.smart help
+help.markup help.topics kernel sequences sorting tools.crossref
+vocabs words ;
IN: annotations
<PRIVATE
-: comment-word ( base -- word ) "!" prepend "annotations" lookup ;
-: comment-usage-word ( base -- word ) "s" append "annotations" lookup ;
-: comment-usage.-word ( base -- word ) "s." append "annotations" lookup ;
+: comment-word ( base -- word ) "!" prepend "annotations" lookup-word ;
+: comment-usage-word ( base -- word ) "s" append "annotations" lookup-word ;
+: comment-usage.-word ( base -- word ) "s." append "annotations" lookup-word ;
PRIVATE>
: $annotation ( element -- )
] bi
<article> "annotations" add-article
-"annotations" vocab "annotations" >>help drop
+"annotations" lookup-vocab "annotations" >>help drop
annotation-tags [
{