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