home *** CD-ROM | disk | FTP | other *** search
/ Fish 'n' More 2 / fishmore-publicdomainlibraryvol.ii1991xetec.iso / dirs / tcl_447.lzh / TCL / tcl.lzh / tcl / tclprocs / help.tcl < prev    next >
Text File  |  1990-05-03  |  224b  |  14 lines
  1.  
  2. global helppath
  3. set helppath "tcl:help"
  4.  
  5. proc help {args} {
  6.     global helppath
  7.     if {[string compare $args ""] == 0} {
  8.         echo "Help is available for the following:"
  9.         run lc $helppath
  10.     } else {
  11.         run more $helppath/$args
  12.     }
  13. }
  14.