Fix import sorting

2023-08-28 17:15:53 +02:00 · 2023-08-28 17:15:53 +02:00 · dbc4266f18
parent d5f1deaa3d
commit dbc4266f18
1 changed files with 2 additions and 1 deletions
--- a/source/library/Language/Haskell/Brittany/Internal/SplitExactModule.hs
+++ b/source/library/Language/Haskell/Brittany/Internal/SplitExactModule.hs
@ -352,7 +352,8 @@ groupifyImportLines ls = finalToList_ $ go (PartialCommsOnly []) ls
      finalYield $ NewlineComment comm
    PartialImport partialRecord ->
      finalYield $ ImportStatement $ unpartial partialRecord
-  go acc (line1 : lineR) = do
+  go acc (EmptyLines 0 : lineR) = go acc lineR
+  go acc (line1        : lineR) = do
    newAcc <- case acc of
      PartialCommsOnly comms -> case line1 of
        e@EmptyLines{} -> do