basis/bootstrap/help/help.factor

   1 USING: help help.topics help.syntax help.crossref
   2 help.definitions io io.files kernel namespaces sequences
   3 parser vocabs vocabs.loader vocabs.loader.private accessors assocs ;
   4 IN: bootstrap.help
   5
   6 : load-help ( -- )
   7     "help.lint" require
   8     "help.vocabs" require
   9
  10     t load-help? set-global
  11
  12     [ dup lookup-vocab [ ] [ no-vocab ] ?if ] load-vocab-hook [
  13         dictionary get values
  14         [ docs-loaded?>> not ] filter
  15         [ load-docs ] each
  16     ] with-variable ;
  17
  18 load-help