the canonical repository is now https://github.com/moose/MooseX-UndefTolerant

[gitmo/MooseX-UndefTolerant.git] / t / defaults.t

diff --git a/t/defaults.t b/t/defaults.t
index 2a04ede..34f25cd 100644 (file)
--- a/t/defaults.t
+++ b/t/defaults.t
@@ -1,3 +1,6 @@
+use strict;
+use warnings;
+
 use Test::More;
 use Test::Fatal;
 use Test::Moose;
@@ -95,10 +98,9 @@ sub do_tests_with_class
                 # used instead...
                 # note "### constructed object: ", $obj->dump(2);
                 ok($obj->has_attr1, 'UT attr1 has a value when assigned undef in constructor');
-                ok($obj->has_attr3, 'attr3 retains its undef value when assigned undef in constructor');
-
                 is($obj->attr1, 1, 'attr1\'s value is its default');
             }
+            ok($obj->has_attr3, 'attr3 retains its undef value when assigned undef in constructor');
 
             is($obj->attr2, 2, 'attr2\'s value is its default');
             is($obj->attr3, undef, 'attr3\'s value is not its default (explicitly set)');