X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F02_thread.t;h=0b5170479ba460ab1466b74b9ab71d6da97cfbf6;hb=53daa8381ac1962b80e5becbffc1d1a2017c9df5;hp=ee4cf33f0a082977ff8f884d8f029538041bad67;hpb=1c89491db81832310d3dfa9037a0fea4d4acd98e;p=p5sagit%2FDevel-GlobalDestruction.git

diff --git a/t/02_thread.t b/t/02_thread.t
index ee4cf33..0b51704 100644
--- a/t/02_thread.t
+++ b/t/02_thread.t
@@ -18,15 +18,15 @@ use warnings;
 use strict;
 
 BEGIN {
-    if ($ENV{DEVEL_GLOBALDESTRUCTION_PP_TEST}) {
-        require DynaLoader;
-        no warnings 'redefine';
-        my $orig = \&DynaLoader::bootstrap;
-        *DynaLoader::bootstrap = sub {
-            die 'no XS' if $_[0] eq 'Devel::GlobalDestruction';
-            goto $orig;
-        };
-    }
+  if ($ENV{DEVEL_GLOBALDESTRUCTION_PP_TEST}) {
+    require DynaLoader;
+    no warnings 'redefine';
+    my $orig = \&DynaLoader::bootstrap;
+    *DynaLoader::bootstrap = sub {
+      die 'no XS' if $_[0] eq 'Devel::GlobalDestruction';
+      goto $orig;
+    };
+  }
 }
 
 my $t = threads->create(sub { do 't/01_basic.t' });