Subversion Repositories DevTools

Rev

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

Rev 3346 Rev 3396
Line 3804... Line 3804...
3804 
        my $bdir = $bf->{dir};
 3804 
        my $bdir = $bf->{dir};
3805 
        my $bname = $bf->{name};
 3805 
        my $bname = $bf->{name};
3806 
        my $bversion = $bf->{version};
 3806 
        my $bversion = $bf->{version};
3807 
Information ("BuildFiles: $bname, $bversion : $bdir");
 3807 
Information ("BuildFiles: $bname, $bversion : $bdir");
3808 
 
 3808 
 
3809 
        if ( exists ($data{$bname}{count}) && ($data{$bname}{count} > 1) )
 3809 
        if ( exists ($data{$bname}{count}) && ($data{$bname}{count} >= 1) )
3810 
        {
 3810 
        {
3811 
            Message ("MultipleBuildFiles for $bname ($bversion)");
 3811 
            Warning ("MultipleBuildFiles for $bname ($bversion)");
3812 
            $rv = 1;
 3812 
            $rv = 1;
3813 
        }
 3813 
        }
3814 
        $data{$bname}{count}++;
 3814 
        $data{$bname}{count}++;
3815 
        push @{$data{$bname}{versions}}, $bversion;
 3815 
        push @{$data{$bname}{versions}}, $bversion;
3816 
    }
 3816 
    }