3c6
@verb #1011:"msg_help" this none this rxdo #7153
@program #1011:"msg_help" this none this
"Copied from the generic feature object (#5252):msg_help by killeen (#562)Dec  8 16:53:27 2000"
all_help = {}
if (typeof(all_help) == $STR)
  all_help = {all_help}
endif
if (this.hm)
  all_help = {@all_help, "", "Specific Help", "-------------"}
  helpless = {}
  for vrb in (this.feature_verbs)
    if (loc = $object_utils:has_verb(this, vrb))
      loc = loc[1]
      help = `$fossil_utils:verb_documentation(loc, vrb) ! ANY => 0'
      if (help)
        all_help = {@all_help, "", tostr(loc, ":", verb_info(loc, vrb)[3]), @help}
      else
        helpless = {@helpless, vrb}
      endif
    endif
  endfor
  if (helpless)
    all_help = {@all_help, "", "No help found on " + $string_utils:english_list(helpless, "nothing", " or ") + "."}
  endif
endif
return {@all_help, "----"}
"Last modified by Dax (#789) on Tue May  3 13:43:08 2005 MDT."
.

0