Subversion Repositories DevTools

Rev

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

Rev 4185 Rev 4287
Line 958... Line 958...
958
            {
958
            {
959
                my $file = substr ( $entry, 8 + $path_length );
959
                my $file = substr ( $entry, 8 + $path_length );
960
                next if ( $allowed{$file} );
960
                next if ( $allowed{$file} );
961
            }
961
            }
962
 
962
 
-
 
963
            #   Some (older) instances of SVN compail about externals as they scan them
-
 
964
            #   Note: Don't happen if we use --xml
-
 
965
            #
-
 
966
            if ($entry =~ m~^Performing status on external item at~)
-
 
967
            {
-
 
968
                next;
-
 
969
            }
-
 
970
 
963
            #
971
            #
964
            #   Examine the first char and rule out funny things
972
            #   Examine the first char and rule out funny things
965
            #
973
            #
966
            my $f1 =  substr ($entry, 0,1 );
974
            my $f1 =  substr ($entry, 0,1 );
967
            next if ( $f1 =~ m{[?I!~]} );
975
            next if ( $f1 =~ m{[?I!~]} );