diff options
Diffstat (limited to 'solenv/bin/build.pl')
| -rw-r--r-- | solenv/bin/build.pl | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/solenv/bin/build.pl b/solenv/bin/build.pl index 238649dfbd7c..fe039c6957a3 100644 --- a/solenv/bin/build.pl +++ b/solenv/bin/build.pl @@ -5,9 +5,9 @@ # # $RCSfile: build.pl,v $ # -# $Revision: 1.130 $ +# $Revision: 1.131 $ # -# last change: $Author: vg $ $Date: 2004-12-06 14:08:55 $ +# last change: $Author: vg $ $Date: 2004-12-22 15:52:55 $ # # The Contents of this file are made available subject to the terms of # either of the following licenses @@ -95,14 +95,16 @@ }; ### for XML file format - #use lib ("/home/vg119683/work/modules"); eval { require XMLBuildListParser; import XMLBuildListParser; }; - $enable_xml = 1 if (!$@); + if (!$@) { + $enable_xml = 1; + @modes_array = split('\s' , $ENV{BUILD_TYPE}); + }; #### script id ##### ( $script_name = $0 ) =~ s/^.*\b(\w+)\.pl$/$1/; - $id_str = ' $Revision: 1.130 $ '; + $id_str = ' $Revision: 1.131 $ '; $id_str =~ /Revision:\s+(\S+)\s+\$/ ? ($script_rev = $1) : ($script_rev = "-"); @@ -472,7 +474,7 @@ sub get_parents_array { my $build_list_ref = $build_lists_hash{$module}; if (ref($build_list_ref) eq 'XMLBuildListParser') { - my @modes_array = split('\s' , $ENV{BUILD_TYPE}); + my @test = $build_list_ref->getModuleDependencies(\@modes_array); return $build_list_ref->getModuleDependencies(\@modes_array); }; foreach (@$build_list_ref) { |