From b87417598606e39549f654c806cd0cf5e39036aa Mon Sep 17 00:00:00 2001 From: Lennart Spitzner Date: Fri, 19 May 2023 19:55:49 +0200 Subject: [PATCH] Fix no-module-header start-of-file whitespace --- .../Language/Haskell/Brittany/Internal/S2_SplitModule.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/source/library/Language/Haskell/Brittany/Internal/S2_SplitModule.hs b/source/library/Language/Haskell/Brittany/Internal/S2_SplitModule.hs index ba87065..bc93371 100644 --- a/source/library/Language/Haskell/Brittany/Internal/S2_SplitModule.hs +++ b/source/library/Language/Haskell/Brittany/Internal/S2_SplitModule.hs @@ -103,7 +103,7 @@ splitModuleDecls lmod = do lastSpan <- do finalYield $ MEExactModuleHead moduleWithoutComments pure - $ maybe (1, 1) (ExactPrint.ss2posEnd) + $ maybe (0, 1) (ExactPrint.ss2posEnd) $ maximumMay $ [ GHC.anchor a | L a _ <- GHC.priorComments $ case hsModAnn' of