hasufell/hpath
1
1
Fork 0
Code Issues 8 Pull Requests Releases Wiki Activity

TESTS: fix before/after

Browse Source
This commit is contained in:
Julian Ospald 2016-06-05 15:25:57 +02:00
parent c5bcb90b65
commit f07619b7c6
No known key found for this signature in database
GPG Key ID: 511B62C09D50CD28
19 changed files with 19 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
test/HPath/IO/CanonicalizePathSpec.hs
View File

@ -40,7 +40,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.canonicalizePath" $ do
-- successes --

2
test/HPath/IO/CopyDirRecursiveCollectFailuresSpec.hs
View File

@ -123,7 +123,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.copyDirRecursive" $ do
-- successes --

2
test/HPath/IO/CopyDirRecursiveOverwriteSpec.hs
View File

@ -90,7 +90,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.copyDirRecursive" $ do
-- successes --

2
test/HPath/IO/CopyDirRecursiveSpec.hs
View File

@ -76,7 +76,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.copyDirRecursive" $ do
-- successes --

2
test/HPath/IO/CopyFileOverwriteSpec.hs
View File

@ -61,7 +61,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.copyFile" $ do
-- successes --

2
test/HPath/IO/CopyFileSpec.hs
View File

@ -60,7 +60,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.copyFile" $ do
-- successes --

2
test/HPath/IO/CreateDirSpec.hs
View File

@ -41,7 +41,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.createDir" $ do
-- successes --

2
test/HPath/IO/CreateRegularFileSpec.hs
View File

@ -39,7 +39,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.createRegularFile" $ do
-- successes --

2
test/HPath/IO/CreateSymlinkSpec.hs
View File

@ -40,7 +40,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.createSymlink" $ do
-- successes --

2
test/HPath/IO/DeleteDirRecursiveSpec.hs
View File

@ -51,7 +51,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.deleteDirRecursive" $ do
-- successes --

2
test/HPath/IO/DeleteDirSpec.hs
View File

@ -52,7 +52,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.deleteDir" $ do
-- successes --

2
test/HPath/IO/DeleteFileSpec.hs
View File

@ -46,7 +46,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.deleteFile" $ do
-- successes --

2
test/HPath/IO/GetDirsFilesSpec.hs
View File

@ -53,7 +53,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.getDirsFiles" $ do
-- successes --

2
test/HPath/IO/GetFileTypeSpec.hs
View File

@ -47,7 +47,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.getFileType" $ do
-- successes --

2
test/HPath/IO/MoveFileOverwriteSpec.hs
View File

@ -51,7 +51,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.moveFile" $ do
-- successes --

2
test/HPath/IO/MoveFileSpec.hs
View File

@ -53,7 +53,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.moveFile" $ do
-- successes --

2
test/HPath/IO/RecreateSymlinkOverwriteSpec.hs
View File

@ -58,7 +58,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.recreateSymlink" $ do
-- successes --

2
test/HPath/IO/RecreateSymlinkSpec.hs
View File

@ -54,7 +54,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.recreateSymlink" $ do
-- successes --

2
test/HPath/IO/RenameFileSpec.hs
View File

@ -51,7 +51,7 @@ cleanupFiles = do
spec :: Spec
spec = beforeAll_ upTmpDir $ before_ setupFiles $ after_ cleanupFiles $
spec = beforeAll_ (upTmpDir >> setupFiles) $ afterAll_ cleanupFiles $
describe "HPath.IO.renameFile" $ do
-- successes --