diff options
| author | Ben Sima <ben@bsima.me> | 2021-07-20 19:16:50 -0400 |
|---|---|---|
| committer | Ben Sima <ben@bsima.me> | 2021-07-20 19:16:50 -0400 |
| commit | 41000ba37602d7921a779038cc2052e88bfab87e (patch) | |
| tree | 312b7645af40c72869e55df8415035c683e082e0 | |
| parent | 86a7f655f822481ad8d4b96be4ad0705bbcb64d8 (diff) | |
hledger-overview: change runway target
| -rwxr-xr-x | hledger-overview.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/hledger-overview.hs b/hledger-overview.hs index 227c1a4..779d4c4 100755 --- a/hledger-overview.hs +++ b/hledger-overview.hs @@ -74,8 +74,9 @@ main = do row "cred load" (Target 0 netCash) $ Just "credit spending minus cash. keep it positive" row "month nut" (Limit monthlyNut thisMonth) $ Just $ "avg: " <> (display $ Diff $ monthlyNut - thisMonth) row " bip" (pr $ roundTo 2 $ trivial * netWorth) Nothing + -- ideally: ramen 12 mo, runway 4 yrs. let (_, _, runwayMo) = runway j t reportopts - row " runway" (Target 36 runwayMo) $ Just "want: 36 months" + row " runway" (Target 12 runwayMo) $ Just "want: 12 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 |