random936/dot-emacs
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Updating ledger.org to fix several ledger reports

Browse Source
This commit is contained in:
Random936
2026-05-03 16:16:56 -04:00
parent f328d62128
commit 1d027b9d61
1 changed files with 6 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
.emacs.d/ledger.org
View File

@@ -13,26 +13,24 @@
(interactive) (interactive)
(find-file (jm/get-ledger-file))) (find-file (jm/get-ledger-file)))
(defun jm/get-ledger-master-file ()
(expand-file-name "Ledger/main.ledger" jm/cloud-root))
(use-package ledger-mode (use-package ledger-mode
:mode ("\\.ledger\\'") :mode ("\\.ledger\\'")
:config :config
(add-to-list 'ledger-report-format-specifiers (add-to-list 'ledger-report-format-specifiers
'("master-file" . (jm/get-ledger-master-file))) '("master-file" . (lambda ()
(expand-file-name "Ledger/main.ledger" jm/cloud-root))))
:custom :custom
(ledger-binary-path "hledger") (ledger-binary-path "hledger")
(ledger-master-file (jm/get-ledger-master-file)) (ledger-master-file (expand-file-name "Ledger/main.ledger" jm/cloud-root))
(ledger-accounts-file (expand-file-name "Ledger/accounts.ledger" jm/cloud-root)) (ledger-accounts-file (expand-file-name "Ledger/accounts.ledger" jm/cloud-root))
(ledger-mode-should-check-version nil) (ledger-mode-should-check-version nil)
(ledger-report-auto-width nil) (ledger-report-auto-width nil)
(ledger-report-links-in-register nil)
(ledger-report-use-native-highlighting nil) (ledger-report-use-native-highlighting nil)
(ledger-report-use-strict t)
(ledger-reports (ledger-reports
'(("bal" "%(binary) -f %(master-file) bal") '(("bal" "%(binary) -f %(master-file) bal")
("monthly balance" "%(binary) -f %(master-file) bal -p 'this month'") ("cashflow" "%(binary) -f %(master-file) -p %(month) bal Income Expenses")
("daily balance" "%(binary) -f %(master-file) bal -p 'today'")
("budget" "%(binary) -f %(master-file) -p %(month) bal --budget") ("budget" "%(binary) -f %(master-file) -p %(month) bal --budget")
("reg" "%(binary) -f %(master-file) reg") ("reg" "%(binary) -f %(master-file) reg")
("account" "%(binary) -f %(master-file) reg %(account)")))) ("account" "%(binary) -f %(master-file) reg %(account)"))))