]> git.wincent.com - docvim.git/commitdiff
Indentation
authorGreg Hurrell <greg@hurrell.net>
Fri, 10 Jun 2016 16:20:11 +0000 (09:20 -0700)
committerGreg Hurrell <greg@hurrell.net>
Fri, 10 Jun 2016 16:20:11 +0000 (09:20 -0700)
tests/tasty.hs

index 239858001d208123c24b17a5af052f64049a9154..efa483ed3f111f3cb0f216755507f7059f4475a3 100644 (file)
@@ -92,22 +92,22 @@ unitTests = testGroup "Unit tests"
 
 goldenTests :: String -> [FilePath] -> ([String] -> String) -> TestTree
 goldenTests description sources transform = testGroup groupName $ do
-  file <- sources -- list monad
-  let
-    run = do
-      input <- readFile file
-      let output = normalize $ transform [input]
-      return $ pack output -- pack because tasty-golden wants a ByteString
-    name = takeBaseName file
-    golden = replaceExtension file ".golden"
-    diff ref new = [ "git"
-                   , "diff"
-                   , "--color"
-                   , "--diff-algorithm=histogram"
-                   , ref
-                   , new
-                   ]
-  return $ goldenVsStringDiff' name diff golden run
+    file <- sources -- list monad
+    let
+      run = do
+        input <- readFile file
+        let output = normalize $ transform [input]
+        return $ pack output -- pack because tasty-golden wants a ByteString
+      name = takeBaseName file
+      golden = replaceExtension file ".golden"
+      diff ref new = [ "git"
+                    , "diff"
+                    , "--color"
+                    , "--diff-algorithm=histogram"
+                    , ref
+                    , new
+                    ]
+    return $ goldenVsStringDiff' name diff golden run
   where
     groupName = "Golden " ++ description ++ " tests"