add line about ->dump missing from Moo objects too

[gitmo/Role-Tiny.git] / t / global-destruction-helper.pl

diff --git a/t/global-destruction-helper.pl b/t/global-destruction-helper.pl
index 13d794c..f238c06 100644 (file)
--- a/t/global-destruction-helper.pl
+++ b/t/global-destruction-helper.pl
@@ -1,7 +1,5 @@
-#!/usr/bin/env perl
-
-use strict;
-use warnings;
+use strictures 1;
+use lib 'lib';
 no warnings 'once'; # work around 5.6.2
 
 {
@@ -12,7 +10,7 @@ no warnings 'once'; # work around 5.6.2
         my $self = shift;
         my ($igd) = @_;
 
-        print $igd || 0, "\n";
+        print $igd ? "true" : "false", "\n";
     }
 }