Subversion Repositories DevTools

Rev

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

Rev 3263 Rev 3346
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
            Message ("MultipleBuildFiles for $bname ($bversion)");
-
 
3812
            $rv = 1;
3812
        }
3813
        }
3813
        $data{$bname}{count}++;
3814
        $data{$bname}{count}++;
3814
        push @{$data{$bname}{versions}}, $bversion;
3815
        push @{$data{$bname}{versions}}, $bversion;
3815
    }
3816
    }
3816
 
3817