From b7ccf3c42ad76072b1c0cbecd5d598bce2368793 Mon Sep 17 00:00:00 2001 From: Greg Sabino Mullane Date: Fri, 20 Dec 2024 11:56:57 -0500 Subject: [PATCH] Do not use TMPDIR if we are providing a path via DBDPG_TEMDIR environment varaible. Per suggestion on RT #157598 --- t/dbdpg_test_setup.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/dbdpg_test_setup.pl b/t/dbdpg_test_setup.pl index 9e25a11c..eeb8a530 100644 --- a/t/dbdpg_test_setup.pl +++ b/t/dbdpg_test_setup.pl @@ -374,7 +374,7 @@ sub connect_database { $su = $testuser = ''; $testdir = exists $ENV{DBDPG_TEMPDIR} ? - File::Temp::tempdir("$ENV{DBDPG_TEMPDIR}/dbdpg_testdatabase_XXXXXX", TMPDIR => 1, CLEANUP => 0) : + File::Temp::tempdir("$ENV{DBDPG_TEMPDIR}/dbdpg_testdatabase_XXXXXX", CLEANUP => 0) : File::Temp::tempdir('dbdpg_testdatabase_XXXXXX', TMPDIR => 1, CLEANUP => 0); my $readme = "$testdir/README";