diff options
| author | hypnotoad <yoda@etoyoc.com> | 2014-09-15 14:59:20 (GMT) |
|---|---|---|
| committer | hypnotoad <yoda@etoyoc.com> | 2014-09-15 14:59:20 (GMT) |
| commit | 4b8398a6ed8396348a2cbcd0da5a47bf42756fab (patch) | |
| tree | c275452edaddba57a3edc61ac52818ba66233462 | |
| parent | a684c1a281bc1a3c98249e6aa961fa57498dd9a7 (diff) | |
| download | tcl-4b8398a6ed8396348a2cbcd0da5a47bf42756fab.zip tcl-4b8398a6ed8396348a2cbcd0da5a47bf42756fab.tar.gz tcl-4b8398a6ed8396348a2cbcd0da5a47bf42756fab.tar.bz2 | |
Removed non-working code from the end of the mkVfs.tcl script
| -rw-r--r-- | tools/mkVfs.tcl | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/tools/mkVfs.tcl b/tools/mkVfs.tcl index 83eb9e6..bc6f3aa 100644 --- a/tools/mkVfs.tcl +++ b/tools/mkVfs.tcl @@ -91,17 +91,3 @@ set VFSROOT $dir }
pkgIndexDir ${TCL_SCRIPT_DIR} $fout ${TCL_SCRIPT_DIR}
close $fout
-exit 0
-puts $fout {
-# Save Tcl the trouble of hunting for these packages
-}
-set ddedll [glob -nocomplain ${TCLSRC_ROOT}/win/tcldde*.dll]
-if {$ddedll != {}} {
- puts $fout [cat ${TCL_SCRIPT_DIR}/dde/pkgIndex.tcl]
-}
-set regdll [glob -nocomplain ${TCLSRC_ROOT}/win/tclreg*.dll]
-if {$regdll != {}} {
- puts $fout [cat ${TCL_SCRIPT_DIR}/reg/pkgIndex.tcl]
-}
-close $fout
-file attributes ${TCL_SCRIPT_DIR}/tclIndex -readonly 1
|