From 1772486872f8ec03ec858061a3f671682da690da Mon Sep 17 00:00:00 2001 From: Ben Sima Date: Sat, 22 May 2021 06:01:28 -0400 Subject: add ramen nut --- hledger-overview.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/hledger-overview.hs b/hledger-overview.hs index 4676958..d943223 100755 --- a/hledger-overview.hs +++ b/hledger-overview.hs @@ -74,8 +74,8 @@ main = do row " trivial" (pr $ roundTo 2 $ trivial * netWorth) Nothing let (_, _, runwayMo) = runway j t reportopts row " runway" (Target 36 runwayMo) $ Just "want: 36 months" - let (_, _, ramenMo) = ramen j t reportopts - row " ramen" (Target 3 ramenMo) $ Just "want: 3 months" + let (ramenNut, _, ramenMo) = ramen j t reportopts + row " ramen" (Target 3 ramenMo) $ Just $ "want: 3 months" <> gap <> "nut: " <> display ramenNut let (thisyear, _, _) = toGregorian t let age = (fromInteger thisyear) - 1992 let n = whenFreedom j t reportopts -- cgit v1.2.3