tests: move t/common.perl to PublicInbox::TestCommon

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

diff --git a/t/edit.t b/t/edit.t
index 09e0cdddf4cb7e0c8bd0c4b4c364008f2282dd92..9a78b45d3d95c9adef49f4817f914c7b112d7554 100644 (file)
--- a/t/edit.t
+++ b/t/edit.t
@@ -4,8 +4,7 @@
 use strict;
 use warnings;
 use Test::More;
-use File::Temp qw/tempdir/;
-require './t/common.perl';
+use PublicInbox::TestCommon;
 require_git(2.6);
 require PublicInbox::Inbox;
 require PublicInbox::InboxWritable;
@@ -18,7 +17,7 @@ foreach my $mod (@mods) {
        plan skip_all => "missing $mod for $0" if $@;
 };
 
-my $tmpdir = tempdir('pi-edit-XXXXXX', TMPDIR => 1, CLEANUP => 1);
+my ($tmpdir, $for_destroy) = tmpdir();
 my $inboxdir = "$tmpdir/v2";
 my $ibx = PublicInbox::Inbox->new({
        inboxdir => $inboxdir,
@@ -130,7 +129,6 @@ $t = 'mailEditor set in config'; {
        is($rc, 0, 'set publicinbox.mailEditor');
        local $ENV{MAIL_EDITOR};
        delete $ENV{MAIL_EDITOR};
-       delete local $ENV{MAIL_EDITOR};
        local $ENV{GIT_EDITOR} = 'echo should not run';
        $cmd = [ '-edit', "-m$mid", $inboxdir ];
        ok(run_script($cmd, undef, $opt), "$t edited message");