use_ok stinks; just load the library

[gitmo/Moose-Autobox.git] / t / 001_basic.t

diff --git a/t/001_basic.t b/t/001_basic.t
index 4c18e6f..a0994d3 100644 (file)
--- a/t/001_basic.t
+++ b/t/001_basic.t
@@ -5,10 +5,6 @@ use warnings;
 
 use Test::More tests => 69;
 
-BEGIN {
-    use_ok('Moose::Autobox');
-}
-
 use Moose::Autobox;
 
 my $VAR1; # for eval of dumps
@@ -24,6 +20,9 @@ ok($s->defined, '... got a defined value');
 eval $s->dump;
 is($VAR1, 5 , '... eval of SCALAR->dump works');
 
+eval $s->flatten;
+is($VAR1, 5 , '... eval of SCALAR->flatten works');
+
 eval $s->perl;
 is($s->perl, $s->dump, '... SCALAR->dump equals SCALAR->perl');