Prevent double summary on bail-out

Author: Leont

Changes

@@ -1,5 +1,7 @@
 Revision history for Test-Harness
 
+        - Prevent double summary on bail-out
+
 3.49_01 2024-04-27
         - Simplify runtests
         - Tidy up core dump file

lib/TAP/Harness.pm

@@ -558,8 +558,8 @@ sub runtests {
         my $bailout;
         eval { $self->aggregate_tests( $aggregate, @tests ); 1 }
             or do { $bailout = $@ || 'unknown_error' };
-        $finish->();
         die $bailout if defined $bailout;
+        $finish->();
     };
     $self->{bail_summary} = sub{
         print "\n";