diff options
author | Craig Earls <enderw88@gmail.com> | 2013-02-15 06:14:33 -0700 |
---|---|---|
committer | Craig Earls <enderw88@gmail.com> | 2013-02-15 06:14:33 -0700 |
commit | 7f0693bcdc6829aaad100c52fcb16dacd89aed62 (patch) | |
tree | bc706ce9a3196200a4248d3c7bad5d802adb0dd4 /lisp/ldg-reconcile.el | |
parent | 089716fb13911ea6a1c044ed5d435809f9e2fff6 (diff) | |
download | fork-ledger-7f0693bcdc6829aaad100c52fcb16dacd89aed62.tar.gz fork-ledger-7f0693bcdc6829aaad100c52fcb16dacd89aed62.tar.bz2 fork-ledger-7f0693bcdc6829aaad100c52fcb16dacd89aed62.zip |
Improved error reporting
Diffstat (limited to 'lisp/ldg-reconcile.el')
-rw-r--r-- | lisp/ldg-reconcile.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/ldg-reconcile.el b/lisp/ldg-reconcile.el index ea8ff06e..bb4bec5e 100644 --- a/lisp/ldg-reconcile.el +++ b/lisp/ldg-reconcile.el @@ -107,7 +107,7 @@ numbers" "Return a buffer from WHERE the transaction is." (if (bufferp (car where)) (car where) - (error "Buffer not set"))) + (error "ledger-reconcile-get-buffer: Buffer not set"))) (defun ledger-reconcile-toggle () "Toggle the current transaction, and mark the recon window." @@ -273,7 +273,7 @@ POSTING is used in `ledger-clear-whole-transactions' is nil." (goto-char (point-min)) (unless (eobp) (unless (looking-at "(") - (error (buffer-string))) + (error (concat "ledger-do-reconcile: " (buffer-string))) (read (current-buffer)))))) ;current-buffer is the *temp* created above (if (> (length xacts) 0) (progn |