formatting

bonnefoa · Nov 30, 2010 · f32107f · f32107f
1 parent b1bdf72
commit f32107f
Showing 1 changed file with 8 additions and 2 deletions.
diff --git a/src/Shaker/Action/Compile.hs b/src/Shaker/Action/Compile.hs
@@ -13,15 +13,21 @@ import Shaker.Type
 
 -- | Run haskell compilation on given CompileInput list
 runCompile :: Plugin
-runCompile = applyPreprocessSources >> asks shakerCompileInputs >>= foldM runUntilFail Succeeded >> return ()
+runCompile = applyPreprocessSources 
+  >> asks shakerCompileInputs 
+  >>= foldM runUntilFail Succeeded
+  >> return ()
 
 runUntilFail :: SuccessFlag -> CompileInput -> Shaker IO SuccessFlag
 runUntilFail Succeeded cpIn = runSingleCompileInput cpIn
 runUntilFail Failed _ = return Failed
 
 -- | Run haskell compilation on all haskell files
 runFullCompile :: Plugin
-runFullCompile = applyPreprocessSources >> convertModuleDataToFullCompileInput >>= foldM runUntilFail Succeeded >> return()
+runFullCompile = applyPreprocessSources 
+  >> convertModuleDataToFullCompileInput 
+  >>= foldM runUntilFail Succeeded 
+  >> return()
 
 runSingleCompileInput :: CompileInput -> Shaker IO SuccessFlag
 runSingleCompileInput cplInp = do