diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-09-09 01:45:41 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-09-09 01:45:41 -0400 |
| commit | e296da4bfef21c55fc23376300becb17a08eea83 (patch) | |
| tree | 8ca17713ac97616deafd1c3c3e475dc062484233 /Messages.hs | |
| parent | e4ba0934c2992f00275bd24e8c4d25d6b9ea10ff (diff) | |
more newline fixes
Adds a missing newline when a longnote is followed by a endresult.
Multiple longnotes in a row will now be separated by a blank line, which
could be a bug or a feature depending on taste.
Removed several places where newlines were explicitly displayed after
longnotes.
Diffstat (limited to 'Messages.hs')
| -rw-r--r-- | Messages.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Messages.hs b/Messages.hs index 492251981..c663c17c2 100644 --- a/Messages.hs +++ b/Messages.hs @@ -57,7 +57,7 @@ showOutput :: Annex () showOutput = handle q $ putStr "\n" showLongNote :: String -> Annex () -showLongNote s = handle (JSON.note s) $ putStr $ '\n' : indent s +showLongNote s = handle (JSON.note s) $ putStrLn $ '\n' : indent s showEndOk :: Annex () showEndOk = showEndResult True |