49 |
|
# |
50 |
|
foreach $key ( keys %ENV ) { |
51 |
|
if ( $key=~/^INT/ ) { |
52 |
< |
adddir($ENV{$key}); |
52 |
> |
AddDir::adddir($ENV{$key}); |
53 |
|
} |
54 |
|
} |
55 |
+ |
if ( ! -e "$ENV{LOCALTOP}/$ENV{projconfigdir}" ) { |
56 |
+ |
system("cp", "-r", "$ENV{RELEASETOP}/$ENV{projconfigdir}", |
57 |
+ |
"$ENV{LOCALTOP}/$ENV{projconfigdir}"); |
58 |
+ |
} |
59 |
|
use clientfile; |
60 |
|
BuildClientFile( $ENV{SCRAM_ProjReqsDoc} ); |
61 |
|
} |
79 |
|
$ENV{INTlog}="logs"; |
80 |
|
|
81 |
|
if ( ! ( exists $ENV{SCRAM_HOME}) ){ |
82 |
< |
$ENV{SCRAM_HOME}="/afs/cern.ch/user/w/williamc/public/ConfigMan"; |
82 |
> |
$ENV{SCRAM_HOME}="/afs/cern.ch/user/w/williamc/public/SCRAM"; |
83 |
|
print "Warning : Environment Variable SCRAM_HOME not set.\n"; |
84 |
|
print "Defaulting to $ENV{SCRAM_HOME}\n"; |
85 |
|
} |