Lines 46-51
sub check_forbidden_patterns {
Link Here
|
46 |
# For the first pass, I don't want to launch any test. |
46 |
# For the first pass, I don't want to launch any test. |
47 |
return 1 if $self->pass == 0; |
47 |
return 1 if $self->pass == 0; |
48 |
|
48 |
|
|
|
49 |
# Patches may create and move files. |
50 |
unless (-e $self->path) { |
51 |
# \n on a warn or die eliminates the at line # mess. |
52 |
warn $self->path . " was created and removed in patchset!\n"; |
53 |
return 1; |
54 |
} |
55 |
|
49 |
my $git = QohA::Git->new(); |
56 |
my $git = QohA::Git->new(); |
50 |
my $diff_log = $git->diff_log($cnt, $self->path); |
57 |
my $diff_log = $git->diff_log($cnt, $self->path); |
51 |
my @forbidden_patterns = @$patterns; |
58 |
my @forbidden_patterns = @$patterns; |
52 |
- |
|
|