OSDN Git Service

t: fix to use var/tmp for temporal directory
authorhylom <hylom@users.sourceforge.jp>
Tue, 29 Aug 2017 10:21:11 +0000 (19:21 +0900)
committerhylom <hylom@users.sourceforge.jp>
Tue, 29 Aug 2017 10:21:11 +0000 (19:21 +0900)
src/newslash_web/t/api/feeds.t
src/newslash_web/t/models/cowrapper.t

index b6891e4..415d5e4 100644 (file)
@@ -98,15 +98,15 @@ subtest 'create/select/update/delete/exports feeds and items' => sub {
       ->json_is('/item/description' => "新しい説明");
 
     # export
-    unlink("/var/newslash/repository/feeds.json");
+    unlink("/var/tmp/feeds.json");
     $t->get_ok("/api/v1/admin/repository/export?target=feeds")
       ->status_is(200);
-    ok(-e "/var/newslash/repository/feeds.json", "feeds.json generated");
+    ok(-e "/var/tmp/feeds.json", "feeds.json generated");
 
     # import
     $t->get_ok("/api/v1/admin/repository/import?target=feeds")
       ->status_is(200);
-    unlink("/var/newslash/repository/feeds.json");
+    unlink("/var/tmp/feeds.json");
 
     # delete
     $params = { action => "delete",
index d1d191c..c06e61e 100644 (file)
@@ -6,6 +6,7 @@ use FileHandle;
 use Test::More;
 use Test::Mojo;
 use JSON;
+use File::Temp;
 
 use Data::Dumper;
 use DateTime;
@@ -48,7 +49,8 @@ EOSQL
     }
 
     # export test
-    $rs = $c->export_json(file => "cow_test.json",
+    my $fname = File::Temp::tmpnam();
+    $rs = $c->export_json(file => $fname,
                           table => "cow_test",
                           exclude => [qw(id hoge)],
                           sort_key => "bar",
@@ -71,13 +73,14 @@ EOSQL
 ]
 EOL
     # check file
-    my $fh = FileHandle->new("cow_test.json", "r");
+    my $fh = FileHandle->new($fname, "r");
     ok($fh, "open test file");
     my $content = do { local $/; <$fh> };
     $fh->close;
-    ok($content, "read from cow_test.json");
-    is($json_ok, $content, "check cow_test.json conent");
-    ok(unlink("cow_test.json"), "delete cow_test.json");
+
+    ok($content, "read from test file");
+    is($json_ok, $content, "check test file's conent");
+    ok(unlink($fname), "delete test file");
 
     # import test
     my $test_data2 = [ { foo => "abcdefg", bar => 200, hoge => "hogehoge" },