From ff489920672e64f42d8847baae1d60da2f2e679b Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Sun, 13 Feb 2005 23:44:41 +0000 Subject: *** empty log message *** --- ledger.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'ledger.el') diff --git a/ledger.el b/ledger.el index b6c491e1..c2e3445d 100644 --- a/ledger.el +++ b/ledger.el @@ -214,11 +214,12 @@ Return the difference in the format of a time value." (let ((exit-code (ledger-run-ledger buffer "-C" "balance" account))) (if (/= 0 exit-code) (message "Error determining cleared balance") - (goto-char (point-min)) + (goto-char (1- (point-max))) + (goto-char (line-beginning-position)) (delete-horizontal-space) - (skip-syntax-forward "^ ") (message "Cleared balance = %s" - (buffer-substring-no-properties (point-min) (point)))))))) + (buffer-substring-no-properties (point) + (line-end-position)))))))) (defun ledger-reconcile-toggle () (interactive) -- cgit v1.2.3