19 |
|
|
20 |
|
GetClass($THISDIR); |
21 |
|
#print "Class = $Class\n"; |
22 |
+ |
#print "ClassDir = $ClassDir\n"; |
23 |
|
if ( grep /none/i , @BuildFile::groups) { |
24 |
|
print "Nothing to be done - empty group\n"; |
25 |
|
exit |
66 |
|
|
67 |
|
chdir $fullworkdir || die "Unable to enter working directory $!"; |
68 |
|
|
69 |
+ |
# Set up some other useful variables fo the Build |
70 |
+ |
# list of directories available |
71 |
+ |
opendir IDR, "$ENV{LOCALTOP}/$THISDIR"; |
72 |
+ |
@allfiles= grep !/^\.\.?$/, readdir IDR; |
73 |
+ |
foreach $file ( @allfiles ) { |
74 |
+ |
if ( -d "$ENV{LOCALTOP}/$THISDIR/$file" ) { # only add if its a directory |
75 |
+ |
$ENV{SCRAM_AVAILDIRS}=$ENV{SCRAM_AVAILDIRS}." ".$file; |
76 |
+ |
} |
77 |
+ |
else { |
78 |
+ |
$ENV{SCRAM_AVAILFILES}=$ENV{SCRAM_AVAILFILES}." ".$file; |
79 |
+ |
} |
80 |
+ |
} |
81 |
+ |
|
82 |
+ |
|
83 |
|
# If not specified default to the class name target |
84 |
|
if ( $#Targets == -1 ) { |
85 |
|
$Targets[0]=$Class |