IN: help.vocabs
: about ( vocab -- )
- [ require ] [ vocab help ] bi ;
+ [ require ] [ lookup-vocab help ] bi ;
: vocab-row ( vocab -- row )
[ <$pretty-link> ] [ vocab-summary ] bi 2array ;
: describe-words ( vocab -- )
{
- { [ dup vocab ] [ words $words ] }
+ { [ dup lookup-vocab ] [ words $words ] }
{ [ dup find-vocab-root ] [ vocab-is-not-loaded ] }
[ drop ]
} cond ;