simonmichael/hledger
1
1
Fork 0
mirror of https://github.com/simonmichael/hledger.git synced 2024-09-16 16:57:38 +03:00
Code Issues Projects Releases Wiki Activity

fix newlines

Browse Source
This commit is contained in:
Simon Michael 2008-06-28 05:07:09 +00:00
parent d795c0bac8
commit daff4bf09e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
LedgerEntry.hs
View File

@ -50,7 +50,7 @@ autofillEntry e@(LedgerEntry _ _ _ _ _ ts _) =
showEntry :: LedgerEntry -> String
showEntry e =
"\n" ++ precedingcomment ++ description ++ unlines (showtxns $ etransactions e)
unlines $ [precedingcomment ++ description] ++ (showtxns $ etransactions e) ++ [""]
where
precedingcomment = epreceding_comment_lines e
description = concat [date, status, code, desc] -- , comment]