tests: mktemp -t: $TMPDIR has higher priority than -p

* tests/misc/mktemp.pl: Ensure that with -t,
$TMPDIR has precedence over -p.

diff --git a/tests/misc/mktemp.pl b/tests/misc/mktemp.pl
index 52f262b588863f54b8a2dac65c4eb349add02607..01dcf61497e35cbaa1756dcac458d776224292ab 100755 (executable)
--- a/tests/misc/mktemp.pl
+++ b/tests/misc/mktemp.pl
@@ -183,6 +183,12 @@ my @Tests =
        check_tmp $f, 'F'; unlink $f; rmdir 'a' or die "rmdir a: $!\n" }}
      ],
 
+     ['priority-t-tmpdir', "-t -p $bad_dir foo.XXX",
+      {ENV=>"TMPDIR=."},
+      {OUT_SUBST => 's,....$,.ZZZ,'},
+      {OUT => "./foo.ZZZ\n"},
+     ],
+
      ['pipe-bad-tmpdir',
       {ENV => "TMPDIR=$bad_dir"},
       {ERR_SUBST => "s,($bad_dir/)[^']+': .*,\$1...,"},