diff --git a/src/Language/Haskell/Brittany.hs b/src/Language/Haskell/Brittany.hs
index fdcc0e7..a190cff 100644
--- a/src/Language/Haskell/Brittany.hs
+++ b/src/Language/Haskell/Brittany.hs
@@ -88,8 +88,12 @@ pPrintModuleAndCheck
   -> GHC.ParsedSource
   -> IO ([LayoutError], TextL.Text)
 pPrintModuleAndCheck conf anns parsedModule = do
+  let ghcOptions     = conf & _conf_forward & _options_ghc & runIdentity
   let (errs, output) = pPrintModule conf anns parsedModule
-  parseResult <- ExactPrint.Parsers.parseModuleFromString "output" (TextL.unpack output)
+  parseResult <- parseModuleFromString ghcOptions
+                                       "output"
+                                       (\_ -> return $ Right ())
+                                       (TextL.unpack output)
   let errs' = errs ++ case parseResult of
         Left{}  -> [LayoutErrorOutputCheck]
         Right{} -> []