From 4a86b4d2cf41ce1ad7125c05529b032017e23da9 Mon Sep 17 00:00:00 2001
From: Julian Ospald <hasufell@posteo.de>
Date: Tue, 3 May 2016 11:53:46 +0200
Subject: [PATCH] TESTS: add missing deleteDirRecursiveSpec, minor cleanup

---
 test/Spec.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/test/Spec.hs b/test/Spec.hs
index 140aa32..08929b4 100644
--- a/test/Spec.hs
+++ b/test/Spec.hs
@@ -62,6 +62,7 @@ main = hspec $ before_ fixPermissions $ after_ revertPermissions $ do
               , recreateSymlinkSpec
               , deleteFileSpec
               , deleteDirSpec
+              , deleteDirRecursiveSpec
               ]
 
   -- run all stateful tests twice to catch missing cleanups or state skew
@@ -72,7 +73,6 @@ main = hspec $ before_ fixPermissions $ after_ revertPermissions $ do
   getFileTypeSpec
   getDirsFilesSpec
 
-  -- TODO: deleteFile, deleteDir, deleteDirRecursive, getDirsFiles, getFileType
   where
     noWriteDirs =  ["test/copyFileSpec/outputDirNoWrite"
                    ,"test/copyDirRecursiveSpec/noWritePerm"
@@ -91,7 +91,7 @@ main = hspec $ before_ fixPermissions $ after_ revertPermissions $ do
                    ,"test/recreateSymlinkSpec/noPerms"
                    ,"test/getFileTypeSpec/noPerms"
                    ,"test/getDirsFilesSpec/noPerms"
-                   , "test/deleteFileSpec/noPerms"
+                   ,"test/deleteFileSpec/noPerms"
                    ]
     fixPermissions = do
       sequence_ $ fmap noWritableDirPerms noWriteDirs