diff --git a/t/mldistwatch-misc.t b/t/mldistwatch-misc.t index 8b0ae6acb..929b32acf 100644 --- a/t/mldistwatch-misc.t +++ b/t/mldistwatch-misc.t @@ -578,6 +578,9 @@ subtest "do not index dists without trial versions" => sub { my $old_name = $pause->upload_author_fake(PERSON => 'Just-Testing-1.22.tar.gz'); my $new_name = $test->{munger}->($old_name); + die "test munger turned old name into old name!" + if $old_name eq $new_name; + rename($old_name, $new_name) or die "can't rename $old_name: $!"; my $result = $pause->test_reindex;