From 7bcc205622442ea46b46343c597994d73f7517b8 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Fri, 29 May 2020 17:33:53 -0700
Subject: [PATCH] lib: drop transactionPostingBalances

---
 hledger-lib/Hledger/Data/Transaction.hs | 8 --------
 1 file changed, 8 deletions(-)

diff --git a/hledger-lib/Hledger/Data/Transaction.hs b/hledger-lib/Hledger/Data/Transaction.hs
index 6a632b532..ddf8ad957 100644
--- a/hledger-lib/Hledger/Data/Transaction.hs
+++ b/hledger-lib/Hledger/Data/Transaction.hs
@@ -36,8 +36,6 @@ module Hledger.Data.Transaction (
   -- nonzerobalanceerror,
   -- * date operations
   transactionDate2,
-  -- * arithmetic
-  transactionPostingBalances,
   -- * transaction description parts
   transactionPayee,
   transactionNote,
@@ -334,12 +332,6 @@ balancedVirtualPostings = filter isBalancedVirtual . tpostings
 transactionsPostings :: [Transaction] -> [Posting]
 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.
 -- On success, returns the empty list, otherwise one or more error messages.
 --