| 1 |
– |
#!/usr/local/bin/perl5 -I/afs/cern.ch/user/w/williamc/public/ConfigMan/toolbox/objects/schema1 |
| 2 |
– |
# |
| 3 |
– |
# Wrapper around the perl objects for system calling |
| 4 |
– |
# |
| 5 |
– |
|
| 1 |
|
package BuildSetup; |
| 2 |
+ |
require 5.001; |
| 3 |
|
require Exporter; |
| 4 |
|
@ISA=qw(Exporter); |
| 5 |
|
@EXPORT=qw(BuildSetup); |
| 6 |
|
use Interface; |
| 7 |
|
use BuildFile; |
| 8 |
< |
use AddDir; |
| 8 |
> |
use Utilities::AddDir; |
| 9 |
|
|
| 10 |
|
sub BuildSetup { |
| 11 |
|
my $THISDIR=shift; |
| 15 |
|
|
| 16 |
|
# Create working directory |
| 17 |
|
chdir $ENV{LOCALTOP}; |
| 18 |
< |
adddir($ENV{INTwork}."/".$THISDIR); |
| 18 |
> |
AddDir::adddir($ENV{INTwork}."/".$THISDIR); |
| 19 |
|
|
| 20 |
|
GetClass($THISDIR); |
| 21 |
< |
print "Class = $Class\n"; |
| 21 |
> |
#print "Class = $Class\n"; |
| 22 |
|
if ( grep /none/i , @BuildFile::groups) { |
| 23 |
|
print "Nothing to be done - empty group\n"; |
| 24 |
|
exit |
| 70 |
|
$Targets[0]=$Class |
| 71 |
|
} |
| 72 |
|
$ENV{DefaultMakefile}="$ENV{TOOL_HOME}/basics.mk"; |
| 73 |
< |
system("gmake","-j 1","-f","$ENV{DefaultMakefile}","-I$ENV{TOOL_HOME}",@Targets); |
| 73 |
> |
system("gmake","--no-print-directory","-j 1","-f","$ENV{DefaultMakefile}","-I$ENV{TOOL_HOME}",@Targets); |
| 74 |
|
} |
