From be4a212ff2839adebd908be42cbf46254bf4f754 Mon Sep 17 00:00:00 2001 From: Craig Earls Date: Sat, 9 Mar 2013 15:04:07 -0700 Subject: Fixed bug where reconcile bombed if you tried to start from a comment --- lisp/ldg-post.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lisp') diff --git a/lisp/ldg-post.el b/lisp/ldg-post.el index 46acad1a..e23b3135 100644 --- a/lisp/ldg-post.el +++ b/lisp/ldg-post.el @@ -234,7 +234,8 @@ BEG, END, and LEN control how far it can align." (defun ledger-post-read-account-with-prompt (prompt) (let* ((context (ledger-context-at-point)) (default - (if (eq (ledger-context-line-type context) 'acct-transaction) + (if (and (eq (ledger-context-line-type context) 'acct-transaction) + (eq (ledger-context-current-field context) 'account)) (regexp-quote (ledger-context-field-value context 'account)) nil))) (ledger-read-string-with-default prompt default))) -- cgit v1.2.3