From 7be93af15838c4d153ca5c6919d7e59cdaaa2904 Mon Sep 17 00:00:00 2001
From: Ben Sima <ben@bsima.me>
Date: Tue, 1 Jun 2021 06:11:33 -0400
Subject: add real sat balance

---
 hledger-overview.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/hledger-overview.hs b/hledger-overview.hs
index dddc09c..cae3149 100755
--- a/hledger-overview.hs
+++ b/hledger-overview.hs
@@ -92,6 +92,8 @@ main = do
   row "     next" (levelup 0.1) $ nextLevel 0.1
   row "    nnext" (levelup 0.2) $ nextLevel 0.2
   row "   nnnext" (levelup 0.3) $ nextLevel 0.3
+  let satbal = getTotal j t (defreportopts {value_ = janj "sat"}) "^as cur:'BTC|sat|sats'"
+  row "real sats" satbal Nothing
 
 -- | <type> <expected> <actual>
 data Metric
-- 
cgit v1.2.3