101 |
|
$ENV{LOCALTOP}."/".$$hashref{'dir'}; |
102 |
|
push @dirstack, $ENV{LOCALTOP}."/".$$hashref{'dir'}; |
103 |
|
$currentdir=$ENV{LOCALTOP}."/".$$hashref{'dir'}; |
104 |
+ |
if ( $switch->context('project') ) { |
105 |
+ |
print INSTALLFILE "<$name name=$$hashref{dir}>\n"; |
106 |
+ |
} |
107 |
|
} |
108 |
|
sub config_endtag { |
109 |
+ |
my $name=shift; |
110 |
+ |
|
111 |
|
pop @dirstack; |
112 |
|
$currentdir=$dirstack[$#dirstack]; |
113 |
+ |
if ( $switch->context('project') ) { |
114 |
+ |
print INSTALLFILE "</$name>\n"; |
115 |
+ |
} |
116 |
|
} |
117 |
|
|
118 |
|
sub file_start { |
211 |
|
my $name=shift; |
212 |
|
my @vars=@_; |
213 |
|
my $hashref; |
206 |
– |
use Utilities::AddDir; |
207 |
– |
use File::Copy; |
208 |
– |
|
209 |
– |
# copy across the files in the config directory |
210 |
– |
AddDir::adddir($ENV{LOCALTOP}/$ENV{projconfigdir}); |
211 |
– |
copy "$ENV{RELEASETOP}/$ENV{projconfigdir}", |
212 |
– |
"$ENV{LOCALTOP}/$ENV{projconfigdir}"; |
214 |
|
} |
215 |
|
|
216 |
|
sub cvsrep_start { |