balancesheet: don't bother showing equity, it won't be useful for most of us

MANUAL.md

@@ -729,8 +729,8 @@ currently assumes that you have top-level accounts named `income` (or
 
 This command displays a simple
 [balance sheet](http://en.wikipedia.org/wiki/Balance_sheet). It currently
-assumes that you have top-level accounts named `asset`, `liability` and
-`equity` (plural forms also allowed.)
+assumes that you have top-level accounts named `asset` and `liability`
+(plural forms also allowed.)
 
 #### cashflow
 

hledger/Hledger/Cli/Balancesheet.hs

@@ -27,16 +27,13 @@ balancesheet CliOpts{reportopts_=ropts} j = do
   let q = queryFromOpts d (withoutBeginDate ropts)
       assetreport@(_,assets)          = accountsReport ropts (And [q, journalAssetAccountQuery j]) j
       liabilityreport@(_,liabilities) = accountsReport ropts (And [q, journalLiabilityAccountQuery j]) j
-      equityreport@(_,equity)         = accountsReport ropts (And [q, journalEquityAccountQuery j]) j
-      total = assets + liabilities + equity
+      total = assets + liabilities
   LT.putStr $ [lt|Balance Sheet
 
 Assets:
 #{unlines $ accountsReportAsText ropts assetreport}
 Liabilities:
 #{unlines $ accountsReportAsText ropts liabilityreport}
-Equity:
-#{unlines $ accountsReportAsText ropts equityreport}
 
 Total:
 --------------------