home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 488.lha / TCL_alpha2 / 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.