X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F00describe_environment.t;h=fc1c6942e9e12c1627abbe4ee8033035d0ce56c2;hb=c8215e2c5a1ae25191d4a7f6bcf7a3a1f89d6970;hp=87b4697b80039ab5420fb491465522ca690b4fb5;hpb=e10d9d292bb2b14a31b45f36bd25b6610bd2e71d;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/00describe_environment.t b/t/00describe_environment.t
index 87b4697..fc1c694 100644
--- a/t/00describe_environment.t
+++ b/t/00describe_environment.t
@@ -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;