diff options
-rw-r--r-- | lisp/ldg-mode.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ldg-mode.el b/lisp/ldg-mode.el index b6e4b7f1..c2e87d8e 100644 --- a/lisp/ldg-mode.el +++ b/lisp/ldg-mode.el @@ -63,7 +63,9 @@ And calculate the target-delta of the account being reconciled." (buffer (current-buffer)) (balance (with-temp-buffer (ledger-exec-ledger buffer (current-buffer) "cleared" account) - (buffer-substring-no-properties (point-min) (1- (point-max)))))) + (if (> (buffer-size) 0) + (buffer-substring-no-properties (point-min) (1- (point-max))) + (concat account " is empty."))))) (when balance (message balance)))) |