fix: pad message with space

This commit is contained in:
orion 2023-12-23 20:47:58 -06:00
parent 135348af98
commit b29c2dcc6c
Signed by: orion
GPG Key ID: 6D4165AE4C928719

View File

@ -41,7 +41,7 @@ pretty log =
context'' {path: p, context: cs} = "[" <> p <> "](" <> intercalate " > " cs <> ")"
context' = context'' $ Array.NonEmpty.last $ context log
in
intercalate "" [ level', actor', context', message log ]
intercalate "" [ level', actor', context', " " <> message log ]
json :: Instant -> Log -> String
json now log = do