1 files changed, 2 insertions(+), 2 deletions(-)

M test/Data/Text/ParagraphLayoutSpec.hs

@@ 137,7 137,7 @@ instance ShouldBeGolden ParagraphLayout where
         , readFromFile = \path -> readFile path >>= return . read
         , goldenFile = ".golden" </> name </> "golden"
         , actualFile = Just (".golden" </> name </> "actual")
-        , failFirstTime = False
+        , failFirstTime = True
         }
 
 instance ShouldBeGolden ShapedRuns where


@@ 148,7 148,7 @@ instance ShouldBeGolden ShapedRuns where
         , readFromFile = \path -> readFile path >>= return . ShapedRuns . read
         , goldenFile = ".golden" </> "shapedRuns" </> name </> "golden"
         , actualFile = Just (".golden" </> "shapedRuns" </> name </> "actual")
-        , failFirstTime = False
+        , failFirstTime = True
         }
 
 fontInfoPath :: String -> FilePath