home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 November / CPNL0711.ISO / beeld / teken / scribus-1.3.3.9-win32-install.exe / tcl / reg1.1 / pkgIndex.tcl next >
Text File  |  2003-11-11  |  382b  |  10 lines
  1. if {![package vsatisfies [package provide Tcl] 8]} {return}
  2. if {[string compare $::tcl_platform(platform) windows]} {return}
  3. if {[info exists ::tcl_platform(debug)]} {
  4.     package ifneeded registry 1.1.3 \
  5.             [list load [file join $dir tclreg11g.dll] registry]
  6. } else {
  7.     package ifneeded registry 1.1.3 \
  8.             [list load [file join $dir tclreg11.dll] registry]
  9. }
  10.