Subversion Repositories DevTools

Rev

Rev 6133 | Rev 6177 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6133 Rev 6138
Line 693... Line 693...
693 
                #   Locate the build files in each package
 693 
                #   Locate the build files in each package
694 
                #   Scan the build files and extract dependancy information
 694 
                #   Scan the build files and extract dependancy information
695 
                #
 695 
                #
696 
                my $bscanner = BuildFileScanner( $pname, 'build.pl',
 696 
                my $bscanner = BuildFileScanner( $pname, 'build.pl',
697 
                                                         '--LocateAll',
 697 
                                                         '--LocateAll',
698 
                                                         '--LimitDepth=3',
 698 
#                                                         '--LimitDepth=3',
699 
                                                         '--ScanDependencies' );
 699 
                                                         '--ScanDependencies' );
700 
                unless ($bscanner->setLocation($_)) {
 700 
                unless ($bscanner->setLocation($_)) {
701 
                    Verbose("Build file missing: Force full scan");
 701 
                    Verbose("Build file missing: Force full scan");
702 
                    @build_list = ();
 702 
                    @build_list = ();
703 
                    last;
 703 
                    last;
Line 739... Line 739...
739 
            #   Locate the build files in each package
 739 
            #   Locate the build files in each package
740 
            #   Scan the build files and extract dependancy information
 740 
            #   Scan the build files and extract dependancy information
741 
            #
 741 
            #
742 
            my $bscanner = BuildFileScanner( $pname, 'build.pl',
 742 
            my $bscanner = BuildFileScanner( $pname, 'build.pl',
743 
                                                     '--LocateAll',
 743 
                                                     '--LocateAll',
744 
                                                     '--LimitDepth=3',
 744 
#                                                     '--LimitDepth=3',
745 
                                                     '--ScanDependencies' );
 745 
                                                     '--ScanDependencies' );
746 
            $bscanner->scan();
 746 
            $bscanner->scan();
747 
            my @blist = $bscanner->getInfo();
 747 
            my @blist = $bscanner->getInfo();
748 
            unless ($quiet) {
 748 
            unless ($quiet) {
749 
                Warning ("Package does not have build files: $pname") unless ( @blist );
 749 
                Warning ("Package does not have build files: $pname") unless ( @blist );