This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
podcheck.t: remove unused variable
authorKarl Williamson <public@khwilliamson.com>
Sun, 25 Sep 2011 15:37:39 +0000 (09:37 -0600)
committerKarl Williamson <public@khwilliamson.com>
Sun, 25 Sep 2011 20:18:09 +0000 (14:18 -0600)
t/porting/podcheck.t

index 1bc03da..3106cbc 100644 (file)
@@ -1655,7 +1655,6 @@ if ($regen) {
 
 # Now ready to output the messages.
 foreach my $filename (@files) {
-    my $test_name = "POD of $filename";
     my $canonical = canonicalize($filename);
     SKIP: {
         my $skip = $filename_to_checker{$filename}->get_skip // "";