about summary refs log tree commit homepage
path: root/t/search-thr-index.t
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2019-11-24 00:22:34 +0000
committerEric Wong <e@80x24.org>2019-11-24 21:46:55 +0000
commitad6f26f3b9f0e428020d05667987556f8fcbec2f (patch)
tree56a26871d3f63b3bc057a5ecb0c326d6c1dd3695 /t/search-thr-index.t
parent2a3e3a0469f54f6a4f80bf04614e5ddd794a6c5e (diff)
downloadpublic-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/search-thr-index.t')
-rw-r--r--t/search-thr-index.t4
1 files changed, 2 insertions, 2 deletions
diff --git a/t/search-thr-index.t b/t/search-thr-index.t
index 26339989..4f793657 100644
--- a/t/search-thr-index.t
+++ b/t/search-thr-index.t
@@ -4,7 +4,6 @@ use strict;
 use warnings;
 use bytes (); # only for bytes::length
 use Test::More;
-use File::Temp qw/tempdir/;
 use PublicInbox::MID qw(mids);
 use Email::MIME;
 my @mods = qw(DBI DBD::SQLite Search::Xapian);
@@ -14,7 +13,8 @@ foreach my $mod (@mods) {
 }
 require PublicInbox::SearchIdx;
 require PublicInbox::Inbox;
-my $tmpdir = tempdir('pi-search-thr-index.XXXXXX', TMPDIR => 1, CLEANUP => 1);
+require './t/common.perl';
+my ($tmpdir, $for_destroy) = tmpdir();
 my $git_dir = "$tmpdir/a.git";
 
 is(0, system(qw(git init -q --bare), $git_dir), "git init (main)");