diff options
Diffstat (limited to 'win/package.tcl')
| -rw-r--r-- | win/package.tcl | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/win/package.tcl b/win/package.tcl new file mode 100644 index 0000000..3b129da --- /dev/null +++ b/win/package.tcl @@ -0,0 +1,19 @@ +set packager {C:\Program Files\Caphyon\Advanced Installer\AdvancedInstaller.exe} +set fout [open pkgIndex.tcl w] +set fid [open [file join .. pkgIndex.tcl]]; +puts -nonewline $fout [read $fid]; +close $fid +set fid [open [file join .. library pkgIndex.tcl]] +foreach line [split [read $fid] \n] { + if {![regexp {^\s*$|^#} $line]} { + puts $fout $line + } +} +close $fid; +close $fout + +file copy -force [file join .. demos zinc-widget] zinc-widget.tcl + +exec $packager /build Tkzinc.aip + +#file delete -force pkgIndex.tcl zinc-widget.tcl |