X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fspamcheck_spamc.t;h=a4a01a8b98ce929cfca434fa3b6cda84b68a2a65;hb=ad6f26f3b9f0e428020d05667987556f8fcbec2f;hp=c13108f4c10318863e9649ddcd7e8a0137df29fe;hpb=2a3e3a0469f54f6a4f80bf04614e5ddd794a6c5e;p=public-inbox.git

diff --git a/t/spamcheck_spamc.t b/t/spamcheck_spamc.t
index c13108f4..a4a01a8b 100644
--- a/t/spamcheck_spamc.t
+++ b/t/spamcheck_spamc.t
@@ -5,9 +5,9 @@ use warnings;
 use Test::More;
 use Email::Simple;
 use IO::File;
-use File::Temp qw/tempdir/;
 use Fcntl qw(:DEFAULT SEEK_SET);
-my $tmpdir = tempdir('spamcheck_spamc-XXXXXX', TMPDIR => 1, CLEANUP => 1);
+require './t/common.perl';
+my ($tmpdir, $for_destroy) = tmpdir();
 
 use_ok 'PublicInbox::Spamcheck::Spamc';
 my $spamc = PublicInbox::Spamcheck::Spamc->new;