make temporary directory by myself

[catagits/Web-Session.git] / t / 003_basic_w_file_store.t

diff --git a/t/003_basic_w_file_store.t b/t/003_basic_w_file_store.t
index 2d767b5..e5f6817 100644 (file)
--- a/t/003_basic_w_file_store.t
+++ b/t/003_basic_w_file_store.t
@@ -14,6 +14,9 @@ use Plack::Session::Store::File;
 use t::lib::TestSession;
 
 my $TMP = File::Spec->catdir('t', 'tmp');
+if ( !-d $TMP ) {
+    mkdir $TMP;
+}
 
 t::lib::TestSession::run_all_tests(
     store           => Plack::Session::Store::File->new( dir => $TMP ),