diff options
| author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2015-07-19 12:28:00 +0100 |
|---|---|---|
| committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2015-07-19 12:28:00 +0100 |
| commit | bfab049986675c47a6b5030ff9c8f39c28e7945e (patch) | |
| tree | fd8fed7f073624b23d7a9ee968ef807e8b50e726 | |
| parent | 139271cd3e9cb3cf25072ebdd400e52275c61b96 (diff) | |
| download | perl-bfab049986675c47a6b5030ff9c8f39c28e7945e.tar.gz | |
Fix test that fails with new warny File::Path
| -rw-r--r-- | t/op/threads-dirh.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/threads-dirh.t b/t/op/threads-dirh.t index 9bd02d1852..e1d5c996ad 100644 --- a/t/op/threads-dirh.t +++ b/t/op/threads-dirh.t @@ -50,7 +50,7 @@ SKIP: { $dir = catdir getcwd(), "thrext$$" . int rand() * 100000; - rmtree($dir); + rmtree($dir) if -d $dir; mkdir($dir); # Create a dir structure like this: |