summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--tag-emacs/emacs.d/init.org6
1 files changed, 5 insertions, 1 deletions
diff --git a/tag-emacs/emacs.d/init.org b/tag-emacs/emacs.d/init.org
index e30291c..b27c54a 100644
--- a/tag-emacs/emacs.d/init.org
+++ b/tag-emacs/emacs.d/init.org
@@ -1401,8 +1401,12 @@ works really nicely.
                                      ("Expenses:This Month" "ledger -f %(ledger-file) bal \\^Expenses -p \"this month\"")
                                      ("On-budget Balances" "ledger -f %(ledger-file) bal --current -R :Budget: Assets:Receivable Liabilities:Personal")
                                      ("All Account Balances" "ledger -f %(ledger-file) bal --current -R \\^Assets \\^Liabilities")
-                                     ("Budget Values (Current Month)" "ledger -f %(ledger-file) bal -p \"this month\" --limit \"payee=~/budget/\"")
+                                     ("Budget Values (Current Month)" "ledger -f %(ledger-file) bal -p \"this month\" --limit \"payee=~/budget/\" \\^Funds")
                                      ("Budget (Cumulative)" "ledger -f %(ledger-file) bal \\^Funds")
+                                     ("Budget Allocation" "ledger -f %(ledger-file) bal -p \"this month\" --limit \"payee=~/budget/\" \\^Funds --format \"\\
+                                      %-17((depth_spacer)+(partial_account))\\
+                                      %10(percent(market(display_total), market(parent.total)))\\
+                                      %16(market(display_total))\n%/\"")
                                      ("bal" "ledger -f %(ledger-file) bal")
                                      ("reg" "ledger -f %(ledger-file) reg")
                                      ("equity" "ledger -f %(ledger-file) equity")