Only move non-empty lines below the in

NixOS · May 14, 2024 · 2ed49bb · 2ed49bb
1 parent 0e348cb
commit 2ed49bb
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/Nixfmt/Pretty.hs b/src/Nixfmt/Pretty.hs
@@ -550,7 +550,10 @@ instance Pretty Expression where
       (binderComments, bindersWithoutComments) =
         foldr
           ( \item (start, rest) -> case item of
-              (Comments inner) | null rest -> (inner : start, rest)
+              (Comments inner)
+                | null rest ->
+                    let (comments, el) = break (== EmptyLine) (reverse inner)
+                    in (reverse comments : start, Comments (reverse el) : rest)
               _ -> (start, item : rest)
           )
           ([], [])