Merge branch 'test-added'

This commit is contained in:
Yanick Champoux 2023-11-12 17:10:25 -05:00
commit 80f9d7b582

View File

@ -0,0 +1,35 @@
use 5.38.0;
use Test2::V0;
use Git::Wrapper;
my $target_branch = $ENV{TARGET_BRANCH} // 'main';
my $git = Git::Wrapper->new('.');
my $on_target = grep { "* $target_branch" eq $_ } $git->branch;
if ($on_target) {
pass "nothing to check here";
}
else {
my @diff = $git->diff($target_branch);
ok test_file_modified(@diff), "added to a test file";
}
sub test_file_modified (@diff) {
my $in_test_file = 0;
for (@diff) {
if (/^diff/) {
$in_test_file = /\.t$/;
next;
}
return 1 if $in_test_file and /^\+/;
}
return 0;
}
done_testing;