Follow extensible exceptions changes

[haskell-directory.git] / tests / copyFile001.hs

diff --git a/tests/copyFile001.hs b/tests/copyFile001.hs
index 219b01b..e279dd0 100644 (file)
--- a/tests/copyFile001.hs
+++ b/tests/copyFile001.hs
@@ -7,7 +7,7 @@ import System.Directory
 import System.IO
 
 main :: IO ()
-main = do try $ removeFile to
+main = do ignoreExceptions $ removeFile to
           cs_before <- getDirectoryContents "copyFile"
           putStrLn "Before:"
           print $ sort cs_before