Change so that we just return the class name, so that roles can permute this class...
[gitmo/MooseX-Storage.git] / t / 002_basic_io.t
index 272f43a..06a3322 100644 (file)
@@ -4,9 +4,11 @@ use strict;
 use warnings;
 
 use Test::More;
-use File::Temp qw(tempdir);
+use Test::TempDir;
+
 use File::Spec::Functions;
-my $dir = tempdir( CLEANUP => 1 );
+
+my $dir = tempdir;
 
 BEGIN {        
     eval "use JSON::Any";