From 381a929ca5fa7df083939e9259f1ad5cf2feca22 Mon Sep 17 00:00:00 2001 From: lecoanet Date: Wed, 18 Oct 2006 13:35:11 +0000 Subject: Pruned unused configuration variables. --- win/package.tcl | 16 ---------------- 1 file changed, 16 deletions(-) (limited to 'win/package.tcl') diff --git a/win/package.tcl b/win/package.tcl index c1ef7b1..fc3e1ff 100644 --- a/win/package.tcl +++ b/win/package.tcl @@ -23,18 +23,6 @@ while { ! [eof $fid] } { if { [regexp {^PATCHLEVEL=(.*)$} $line dummy patchlevel] } { continue } - if { [regexp {^VERSION=(.*)$} $line dummy version] } { - continue - } - if { [regexp {^PACKAGE=(.*)$} $line dummy package] } { - continue - } - if { [regexp {^Tkzinc_LIB_FILE=(.*)$} $line dummy libFile] } { - continue - } - if { [regexp {^Tkzincstub_LIB_FILE=(.*)$} $line dummy stubLibFile] } { - continue - } } close $fid @@ -68,10 +56,6 @@ if { $todo eq "subst" || $todo eq "" } { regsub -all {@MAJOR_VERSION@} $line $major line regsub -all {@MINOR_VERSION@} $line $minor line regsub -all {@PATCHLEVEL@} $line $patchlevel line - regsub -all {@VERSION@} $line $version line - regsub -all {@PACKAGE@} $line $package line - regsub -all {@Tkzinc_LIB_FILE@} $line $libFile line - regsub -all {@Tkzincstub_LIB_FILE@} $line $stubLibFile line puts $fod $line } -- cgit v1.1