home *** CD-ROM | disk | FTP | other *** search
/ Practical Programming in Tcl & Tk (4th Edition) / TCLBOOK4.BIN / pc / exsource / 22_14.tcl < prev    next >
Text File  |  2003-04-16  |  378b  |  20 lines
  1. #
  2. # Example 22-14
  3. # Examining data in a Metakit view.
  4. #
  5.  
  6. mk::view layout tclhttpd.dirs
  7. #=> name parent:I {files {{name size:I date:I contents:B}}
  8. mk::view size tclhttpd.dirs
  9. #=> 48
  10. mk::get tclhttpd.dirs!0
  11. #=> name <root> parent -1
  12. mk::get tclhttpd.dirs!1
  13. #=> name tcllib1.3 parent 0
  14. mk::get tclhttpd.dirs!1 name
  15. #=> tcllib1.3
  16. mk::get tclhttpd.dirs!0.files!0 name
  17. #=> main.tcl
  18.  
  19.  
  20.