diff options
Diffstat (limited to 'lisp/ldg-mode.el')
| -rw-r--r-- | lisp/ldg-mode.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/ldg-mode.el b/lisp/ldg-mode.el index b6e4b7f1..75b842e2 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)))) @@ -122,8 +124,7 @@ Can indent, complete or align depending on context." (set (make-local-variable 'font-lock-defaults) '(ledger-font-lock-keywords nil t))) (setq font-lock-extend-region-functions - (list #'font-lock-extend-region-wholelines - #'ledger-extend-region-multiline-comment)) + (list #'font-lock-extend-region-wholelines)) (setq font-lock-multiline nil) (set (make-local-variable 'pcomplete-parse-arguments-function) |