;lib: commentAddTagNextLine was broken
It would not add the tag when a comment already existed. This affected hledger-print-location.hs and probably the generated-transaction: tag in periodic transactions.
This commit is contained in:
parent
c8bc9c7088
commit
50bfc26ca7
@ -377,7 +377,7 @@ commentAddTag c (t,v)
|
||||
-- A space is inserted following the colon, before the value.
|
||||
commentAddTagNextLine :: Text -> Tag -> Text
|
||||
commentAddTagNextLine cmt (t,v) =
|
||||
cmt <> if "\n" `T.isSuffixOf` cmt then "" else "\n" <> t <> ": " <> v
|
||||
cmt <> (if "\n" `T.isSuffixOf` cmt then "" else "\n") <> t <> ": " <> v
|
||||
|
||||
|
||||
-- tests
|
||||
|
||||
Loading…
Reference in New Issue
Block a user