tests: use File::Temp->newdir instead of tempdir()

[public-inbox.git] / t / html_index.t

diff --git a/t/html_index.t b/t/html_index.t
index 2f4b4d1b71747b2b42227677f46dc1f072c540aa..51ea9a25fb4ed6bb876154b80b416ea43d55a33f 100644 (file)
--- a/t/html_index.t
+++ b/t/html_index.t
@@ -8,8 +8,8 @@ use PublicInbox::Feed;
 use PublicInbox::Git;
 use PublicInbox::Import;
 use PublicInbox::Inbox;
-use File::Temp qw/tempdir/;
-my $tmpdir = tempdir('pi-http-XXXXXX', TMPDIR => 1, CLEANUP => 1);
+require './t/common.perl';
+my ($tmpdir, $for_destroy) = tmpdir();
 my $git_dir = "$tmpdir/gittest";
 my $ibx = PublicInbox::Inbox->new({
        address => 'test@example',