Use IfElse package for whenM/unlessM

2016-06-05 21:52:52 +02:00
parent 4d71ad08ce
commit a5942ff026
4 changed files with 11 additions and 35 deletions
--- a/test/Utils.hs
+++ b/test/Utils.hs
@@ -14,6 +14,10 @@ import Control.Monad
    forM_
  , void
  )
+import Control.Monad.IfElse
+  (
+    whenM
+  )
 import qualified Data.ByteString as BS
 import Data.IORef
  (
@@ -24,7 +28,6 @@ import Data.IORef
  )
 import HPath.IO
 import HPath.IO.Errors
-import HPath.IO.Utils
 import Data.Maybe
  (
    fromJust