Revert autogenerated tests. Tests should not changed radically.

[gitmo/Mouse.git] / t / 010_basics / 020-global-destruction.t

diff --git a/t/010_basics/020-global-destruction.t b/t/010_basics/020-global-destruction.t
index 6ec3a6b..42aa362 100644 (file)
--- a/t/010_basics/020-global-destruction.t
+++ b/t/010_basics/020-global-destruction.t
@@ -1,7 +1,4 @@
 #!/usr/bin/perl
-# This is automatically generated by author/import-moose-test.pl.
-# DO NOT EDIT THIS FILE. ANY CHANGES WILL BE LOST!!!
-use t::lib::MooseCompat;
 
 use strict;
 use warnings;
@@ -46,9 +43,14 @@ use Test::More;
     my $bar = Bar->new;
 }
 
-ok(
-    $_,
-    'in_global_destruction state is passed to DEMOLISH properly (true)'
-) for split //, `$^X t/010_basics/020-global-destruction-helper.pl`;
+$? = 0;
+
+my $blib = $INC{'blib.pm'} ? ' -Mblib ' : '';
+my @status = `$^X $blib t/010_basics/020-global-destruction-helper.pl`;
+
+ok $status[0], 'in_global_destruction state is passed to DEMOLISH properly (true)';
+ok $status[1], 'in_global_destruction state is passed to DEMOLISH properly (true)';
+
+is $?, 0, 'exited successfully';
 
 done_testing;