summaryrefslogtreecommitdiff
path: root/lib/Memoize/t/tie_sdbm.t
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Memoize/t/tie_sdbm.t')
-rw-r--r--lib/Memoize/t/tie_sdbm.t9
1 files changed, 1 insertions, 8 deletions
diff --git a/lib/Memoize/t/tie_sdbm.t b/lib/Memoize/t/tie_sdbm.t
index 48895355c6..588efd9561 100644
--- a/lib/Memoize/t/tie_sdbm.t
+++ b/lib/Memoize/t/tie_sdbm.t
@@ -28,14 +28,7 @@ if ($@) {
print "1..4\n";
-if (eval {require File::Spec::Functions}) {
- File::Spec::Functions->import('tmpdir', 'catfile');
- $tmpdir = tmpdir();
-} else {
- *catfile = sub { join '/', @_ };
- $tmpdir = $ENV{TMP} || $ENV{TMPDIR} || '/tmp';
-}
-$file = catfile($tmpdir, "md$$");
+$file = "md$$";
1 while unlink $file, "$file.dir", "$file.pag";
if ( $^O eq 'VMS' ) {
1 while unlink "$file.sdbm_dir";