lib: drop transactionPostingBalances

This commit is contained in:
Simon Michael 2020-05-29 17:33:53 -07:00
parent 0a5fa33f9d
commit 7bcc205622

View File

@ -36,8 +36,6 @@ module Hledger.Data.Transaction (
-- nonzerobalanceerror, -- nonzerobalanceerror,
-- * date operations -- * date operations
transactionDate2, transactionDate2,
-- * arithmetic
transactionPostingBalances,
-- * transaction description parts -- * transaction description parts
transactionPayee, transactionPayee,
transactionNote, transactionNote,
@ -334,12 +332,6 @@ balancedVirtualPostings = filter isBalancedVirtual . tpostings
transactionsPostings :: [Transaction] -> [Posting] transactionsPostings :: [Transaction] -> [Posting]
transactionsPostings = concatMap tpostings transactionsPostings = concatMap tpostings
-- | Get the sums of a transaction's real, virtual, and balanced virtual postings.
transactionPostingBalances :: Transaction -> (MixedAmount,MixedAmount,MixedAmount)
transactionPostingBalances t = (sumPostings $ realPostings t
,sumPostings $ virtualPostings t
,sumPostings $ balancedVirtualPostings t)
-- | Check that this transaction would appear balanced to a human when displayed. -- | Check that this transaction would appear balanced to a human when displayed.
-- On success, returns the empty list, otherwise one or more error messages. -- On success, returns the empty list, otherwise one or more error messages.
-- --