cpan/Test-Simple - Update to version 1.302215

1.302215  2025-11-13 16:41:55-08:00 America/Los_Angeles

Author: thibaultduponchelle

Porting/Maintainers.pl

@@ -1121,8 +1121,8 @@ package Maintainers;
     },
 
     'Test::Simple' => {
-        'DISTRIBUTION' => 'EXODIST/Test-Simple-1.302214.tar.gz',
-        'SYNCINFO'     => 'jkeenan on Fri Jun 27 06:54:11 2025',
+        'DISTRIBUTION' => 'EXODIST/Test-Simple-1.302215.tar.gz',
+        'SYNCINFO'     => 'tib on Fri Nov 14 12:18:03 2025',
         'FILES'        => q[cpan/Test-Simple],
         'EXCLUDED'     => [
             qr{^examples/},

cpan/Test-Simple/lib/Test/Builder.pm

@@ -4,7 +4,7 @@ use 5.006;
 use strict;
 use warnings;
 
-our $VERSION = '1.302214';
+our $VERSION = '1.302215';
 
 use Scalar::Util qw/blessed reftype weaken/;
 

cpan/Test-Simple/lib/Test/Builder/Formatter.pm

@@ -2,7 +2,7 @@ package Test::Builder::Formatter;
 use strict;
 use warnings;
 
-our $VERSION = '1.302214';
+our $VERSION = '1.302215';
 
 BEGIN { require Test2::Formatter::TAP; our @ISA = qw(Test2::Formatter::TAP) }
 

cpan/Test-Simple/lib/Test/Builder/Module.pm

@@ -7,7 +7,7 @@ use Test::Builder;
 require Exporter;
 our @ISA = qw(Exporter);
 
-our $VERSION = '1.302214';
+our $VERSION = '1.302215';
 
 
 =head1 NAME

cpan/Test-Simple/lib/Test/Builder/Tester.pm

@@ -1,7 +1,7 @@
 package Test::Builder::Tester;
 
 use strict;
-our $VERSION = '1.302214';
+our $VERSION = '1.302215';
 
 use Test::Builder;
 use Symbol;

cpan/Test-Simple/lib/Test/Builder/Tester/Color.pm

@@ -1,7 +1,7 @@
 package Test::Builder::Tester::Color;
 
 use strict;
-our $VERSION = '1.302214';
+our $VERSION = '1.302215';
 
 require Test::Builder::Tester;
 

cpan/Test-Simple/lib/Test/Builder/TodoDiag.pm

@@ -2,7 +2,7 @@ package Test::Builder::TodoDiag;
 use strict;
 use warnings;
 
-our $VERSION = '1.302214';
+our $VERSION = '1.302215';
 
 BEGIN { require Test2::Event::Diag; our @ISA = qw(Test2::Event::Diag) }
 

cpan/Test-Simple/lib/Test/More.pm

@@ -17,7 +17,7 @@ sub _carp {
     return warn @_, " at $file line $line\n";
 }
 
-our $VERSION = '1.302214';
+our $VERSION = '1.302215';
 
 use Test::Builder::Module;
 our @ISA    = qw(Test::Builder::Module);

cpan/Test-Simple/lib/Test/Simple.pm

@@ -4,7 +4,7 @@ use 5.006;
 
 use strict;
 
-our $VERSION = '1.302214';
+our $VERSION = '1.302215';
 
 use Test::Builder::Module;
 our @ISA    = qw(Test::Builder::Module);

cpan/Test-Simple/lib/Test/Tester.pm

@@ -16,7 +16,7 @@ use Test::Tester::Delegate;
 
 require Exporter;
 
-our $VERSION = '1.302214';
+our $VERSION = '1.302215';
 
 our @EXPORT = qw( run_tests check_tests check_test cmp_results show_space );
 our @ISA = qw( Exporter );
@@ -137,7 +137,8 @@ sub cmp_result
 	my ($result, $expect, $name) = @_;
 
 	my $sub_name = $result->{name};
-	$sub_name = "" unless defined($name);
+	$name = "" unless defined($name);
+	$sub_name = "" unless defined $sub_name;
 
 	my $desc = "subtest '$sub_name' of '$name'";