diff options
| -rw-r--r-- | tests/CuTmpdir.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/CuTmpdir.pm b/tests/CuTmpdir.pm index e21306a57..a7dd8b6a8 100644 --- a/tests/CuTmpdir.pm +++ b/tests/CuTmpdir.pm @@ -82,7 +82,9 @@ sub import { if ($$ == $original_pid and defined $dir) { chmod_tree; - File::Temp::cleanup; + # Older versions of File::Temp lack this method. + exists &File::Temp::cleanup + and &File::Temp::cleanup; } $SIG{$sig} = 'DEFAULT'; kill $sig, $$; |