diff --git a/hledger/Hledger/Cli/Utils.hs b/hledger/Hledger/Cli/Utils.hs index 4498307af..8dc171092 100644 --- a/hledger/Hledger/Cli/Utils.hs +++ b/hledger/Hledger/Cli/Utils.hs @@ -92,7 +92,7 @@ pivot tag j = j{jtxns = map pivotTrans . jtxns $ j} pivotTrans t = t{tpostings = map pivotPosting . tpostings $ t} pivotPosting p | Just (_ , value) <- tagTuple = p{paccount = value, porigin = Just $ originalPosting p} - | _ <- tagTuple = p + | _ <- tagTuple = p{paccount = T.pack ""} where tagTuple = find ((tag ==) . fst) . postingAllImplicitTags $ p -- | Apply the anonymisation transformation on a journal, if option is present diff --git a/tests/misc/pivot.test b/tests/misc/pivot.test index 743dd5de9..1dbe24196 100644 --- a/tests/misc/pivot.test +++ b/tests/misc/pivot.test @@ -9,8 +9,8 @@ hledger -f- --pivot TAG print ; TAG: value >>> 2016/02/16 Test Transaction - Account1 2 EUR - value -2 EUR + 2 EUR + value -2 EUR ; TAG: value >>>=0 @@ -23,8 +23,8 @@ hledger -f- --pivot member bal --no-total income:member fees -2 EUR ; member: John Doe >>> + 2 EUR -2 EUR John Doe - 2 EUR assets:bank account >>>=0 # check with another example @@ -35,8 +35,8 @@ hledger -f- --pivot budget bal --no-total income:donations -2 EUR ; budget: Freifunk >>> + 2 EUR -2 EUR Freifunk - 2 EUR assets:bank account >>>=0 # query on account will find either effective name or original one