mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix reversion in warning newline

Browse source 
indent removes any trailing newline, so put the trailing newline after
calling indent.

Sponsored-by: unqueued on Patreon
This commit is contained in:
Joey Hess 2023-04-12 12:29:56 -04:00
parent 708f4756d4
commit ad71f005b8
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Messages.hs
View file

@ -207,7 +207,7 @@ warning' :: Bool -> (S.ByteString -> S.ByteString) -> StringContainingQuotedPath
warning' makeway consolewhitespacef w = do
when makeway $
outputMessage JSON.none id "\n"
outputError consolewhitespacef (w <> "\n")
outputError (\s -> consolewhitespacef s <> "\n") w
{- Not concurrent output safe. -}
warningIO :: String -> IO ()