Merge branch 'test-added'
This commit is contained in:
commit
80f9d7b582
35
t/merge-ready/added-test.t
Normal file
35
t/merge-ready/added-test.t
Normal 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;
|
Loading…
Reference in New Issue
Block a user