Fix pretty string

This commit is contained in:
Dan Neumann 2022-05-17 03:18:48 -05:00
parent db2674df76
commit 288da39c90

View File

@ -866,11 +866,11 @@ prettyNode_ indent node_ =
let
ss =
s
|> String.trim
|> String.split "\n"
|> List.filter (String.trim >> String.isEmpty >> not)
|> String.join ("\n" ++ String.padLeft (indent * 4) ' ' "")
in
-- "\n" ++ pad ++ s
"\n" ++ pad ++ ss
Comment s ->