diff options
Diffstat (limited to 'Utility/Tmp.hs')
| -rw-r--r-- | Utility/Tmp.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/Tmp.hs b/Utility/Tmp.hs index 8c897d749..532946785 100644 --- a/Utility/Tmp.hs +++ b/Utility/Tmp.hs @@ -69,7 +69,7 @@ withTmpDirIn tmpdir template = bracket create remove -- after a process has just written to it and exited. -- Because it's crap, presumably. So, ignore failure -- to delete the temp directory. - catchIO $ removeDirectoryRecursive d + void $ catchIO $ removeDirectoryRecursive d #else removeDirectoryRecursive d #endif |