Fix error-eating thinko from 6c7ca962
Peter Rabbitson [Sat, 16 Jul 2016 11:59:30 +0000 (13:59 +0200)]
$@ is not visible in $SIG{__DIE__}

t/00describe_environment.t

index 87b4697..fc1c694 100644 (file)
@@ -51,7 +51,7 @@ use Test::More 'no_plan';
 
 # Things happen... unfortunately
 $SIG{__DIE__} = sub {
-  die unless defined $^S and ! $^S;
+  die $_[0] unless defined $^S and ! $^S;
 
   diag "Something horrible happened while assembling the diag data\n$_[0]";
   exit 0;