diff options
author | Craig Earls <enderw88@gmail.com> | 2013-04-08 10:45:04 -0700 |
---|---|---|
committer | Craig Earls <enderw88@gmail.com> | 2013-04-08 10:45:04 -0700 |
commit | 3adab52660d8b7aacf13669140d7a9414fb9a0a9 (patch) | |
tree | 58ef0d6d39ed4237b059f705ac4bec7b99edaeab /lisp | |
parent | 33c046d06876915864de397ed1c3d8d671ffd1db (diff) | |
download | fork-ledger-3adab52660d8b7aacf13669140d7a9414fb9a0a9.tar.gz fork-ledger-3adab52660d8b7aacf13669140d7a9414fb9a0a9.tar.bz2 fork-ledger-3adab52660d8b7aacf13669140d7a9414fb9a0a9.zip |
Improve quick display.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/ldg-mode.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/ldg-mode.el b/lisp/ldg-mode.el index 98236980..85cec39f 100644 --- a/lisp/ldg-mode.el +++ b/lisp/ldg-mode.el @@ -65,10 +65,12 @@ And calculate the target-delta of the account being reconciled." (pending (ledger-reconcile-get-cleared-or-pending-balance (current-buffer) account))) (when pending (if ledger-target - (message "Pending balance: %s, Difference from target: %s" + (message "%s balance: %s, Difference from target: %s" + account (ledger-commodity-to-string pending) (ledger-commodity-to-string (-commodity ledger-target pending))) - (message "Pending balance: %s" + (message "%s balance: %s" + account (ledger-commodity-to-string pending)))))) (defun ledger-magic-tab (&optional interactively) |