Do not use TMPDIR if we are providing a path via DBDPG_TEMDIR environ…

…ment varaible. Per suggestion on RT #157598
bucardo · Dec 20, 2024 · b7ccf3c · haarg · Dec 21, 2024 · esabol
1 parent 7c6c1e0
commit b7ccf3c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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";