diff --git a/app/check-recipes/Main.hs b/app/check-recipes/Main.hs
index 2b57b46..dd53e78 100644
--- a/app/check-recipes/Main.hs
+++ b/app/check-recipes/Main.hs
@@ -2,11 +2,11 @@
 
 module Main (main) where
 
+import qualified Data.Text.IO as TIO
+import Roux.Parser (parseCookFile)
 import System.Directory (listDirectory)
 import System.Environment (getArgs)
 import System.FilePath (takeExtension, (</>))
-import qualified Data.Text.IO as TIO
-import Roux.Parser (parseCookFile)
 
 main :: IO ()
 main = do
diff --git a/test/Roux/ParserSpec.hs b/test/Roux/ParserSpec.hs
index 752070c..26b48bb 100644
--- a/test/Roux/ParserSpec.hs
+++ b/test/Roux/ParserSpec.hs
@@ -373,9 +373,9 @@ spec = do
                 Left err -> expectationFailure ("parse failed: " <> err)
                 Right recipe -> do
                     let items = stepItems recipe
-                    items `shouldBe`
-                        [ StepIngredient (Ingredient "water" (Just (Quantity (3 % 2) (Just "cups") False)) Nothing)
-                        ]
+                    items
+                        `shouldBe` [ StepIngredient (Ingredient "water" (Just (Quantity (3 % 2) (Just "cups") False)) Nothing)
+                                   ]
 
         it "parses quantity with trailing unit (no %)" $ do
             let input = "@gelatine{3tsp}"
@@ -383,9 +383,9 @@ spec = do
                 Left err -> expectationFailure ("parse failed: " <> err)
                 Right recipe -> do
                     let items = stepItems recipe
-                    items `shouldBe`
-                        [ StepIngredient (Ingredient "gelatine" (Just (Quantity 3 (Just "tsp") False)) Nothing)
-                        ]
+                    items
+                        `shouldBe` [ StepIngredient (Ingredient "gelatine" (Just (Quantity 3 (Just "tsp") False)) Nothing)
+                                   ]
 
     describe "Recipe references" $ do
         it "parses a recipe reference" $ do