X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F030_with_checksum.t;h=e38986a151b4291eeb97322b3393676bc3b91601;hb=c2d52f94beb56939250944a12df15d7d90779866;hp=0715831195f0f01fe45841b86b42ecb282902c29;hpb=c2dae5d88280be6f80857e79194f092298f88b36;p=gitmo%2FMooseX-Storage.git

diff --git a/t/030_with_checksum.t b/t/030_with_checksum.t
index 0715831..e38986a 100644
--- a/t/030_with_checksum.t
+++ b/t/030_with_checksum.t
@@ -116,7 +116,12 @@ BEGIN {
 
 SKIP: {
     eval { require Digest::HMAC_SHA1 };
-    skip join( " ", "no Digest::HMAC", ( $@ =~ /\@INC/ ? () : do { chomp(my $e = $@); "($e)" } ) ), 15 if $@;
+    if ($@)
+    {
+        my $message = join( " ", "no Digest::HMAC", ( $@ =~ /\@INC/ ? () : do { chomp(my $e = $@); "($e)" } ) );
+        die $message if $ENV{AUTHOR_TESTING};
+        skip $message, 15;
+    }
 
     local $::DEBUG = 1;