help.vocabs: tweaked the vocab-not-loaded msg
parent
fad3d47a8b
commit
b6d57a4d19
basis/help/vocabs
|
@ -228,10 +228,9 @@ C: <vocab-author> vocab-author
|
|||
] unless-empty ;
|
||||
|
||||
: vocab-is-not-loaded ( vocab -- )
|
||||
"Attention" $heading
|
||||
vocab-name dup "The " " vocabulary is not loaded. In order to browse "
|
||||
"its documentation, you must first load it." append surround print-element
|
||||
"USE: " prepend 1array $code ;
|
||||
"Words" $heading
|
||||
"You must first load (USE:) this vocab to browse its documentation/words."
|
||||
print-element vocab-name "USE: " prepend 1array $code ;
|
||||
|
||||
: describe-words ( vocab -- )
|
||||
dup vocab [ words $words ] [ vocab-is-not-loaded ] if ;
|
||||
|
|
Loading…
Reference in New Issue