make temporary directory by myself

[catagits/Web-Session.git] / t / 004_basic_file_w_customs.t

diff --git a/t/004_basic_file_w_customs.t b/t/004_basic_file_w_customs.t
index 90bfa0c..0683a79 100644 (file)
--- a/t/004_basic_file_w_customs.t
+++ b/t/004_basic_file_w_customs.t
@@ -19,6 +19,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(