@@ -, +, @@ another patch --------- -- see the warning -- no more warning --- QohA/File.pm | 7 +++++++ 1 file changed, 7 insertions(+) --- a/QohA/File.pm +++ a/QohA/File.pm @@ -46,6 +46,13 @@ sub check_forbidden_patterns { # For the first pass, I don't want to launch any test. return 1 if $self->pass == 0; + # Patches may create and move files. + unless (-e $self->path) { + # \n on a warn or die eliminates the at line # mess. + warn $self->path . " was created and removed in patchset!\n"; + return 1; + } + my $git = QohA::Git->new(); my $diff_log = $git->diff_log($cnt, $self->path); my @forbidden_patterns = @$patterns; --