diff options
author | Eric Wong <e@80x24.org> | 2019-11-24 00:22:34 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2019-11-24 21:46:55 +0000 |
commit | ad6f26f3b9f0e428020d05667987556f8fcbec2f (patch) | |
tree | 56a26871d3f63b3bc057a5ecb0c326d6c1dd3695 /t/purge.t | |
parent | 2a3e3a0469f54f6a4f80bf04614e5ddd794a6c5e (diff) | |
download | public-inbox-ad6f26f3b9f0e428020d05667987556f8fcbec2f.tar.gz |
tests: use File::Temp->newdir instead of tempdir()
We'll also introduce a tmpdir() API to give tempdirs consistent names.
Diffstat (limited to 't/purge.t')
-rw-r--r-- | t/purge.t | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -3,7 +3,6 @@ use strict; use warnings; use Test::More; -use File::Temp qw/tempdir/; require './t/common.perl'; require_git(2.6); my @mods = qw(DBI DBD::SQLite); @@ -13,7 +12,7 @@ foreach my $mod (@mods) { }; use Cwd qw(abs_path); # we need this since we chdir below my $purge = abs_path('blib/script/public-inbox-purge'); -my $tmpdir = tempdir('pi-purge-XXXXXX', TMPDIR => 1, CLEANUP => 1); +my ($tmpdir, $for_destroy) = tmpdir(); use_ok 'PublicInbox::V2Writable'; my $inboxdir = "$tmpdir/v2"; my $ibx = PublicInbox::Inbox->new({ |