diff options
author | Craig Earls <enderw88@gmail.com> | 2013-04-06 23:13:49 -0700 |
---|---|---|
committer | Craig Earls <enderw88@gmail.com> | 2013-04-06 23:13:49 -0700 |
commit | 4df990014fede0c7b0c23396f32b1f2c7c636426 (patch) | |
tree | ec695fcacfffd67a6cb8e052830f433fdb8cd1b7 /lisp/ldg-post.el | |
parent | 2f3053401a043495860d6d6ee1febe48c3b537aa (diff) | |
download | fork-ledger-4df990014fede0c7b0c23396f32b1f2c7c636426.tar.gz fork-ledger-4df990014fede0c7b0c23396f32b1f2c7c636426.tar.bz2 fork-ledger-4df990014fede0c7b0c23396f32b1f2c7c636426.zip |
Fixed reconciliation initialization. Now prompts with only account, not status and amount
Moved context function to leg-context, from leg-report. Cleaned up many regex in ldg-context.
Diffstat (limited to 'lisp/ldg-post.el')
-rw-r--r-- | lisp/ldg-post.el | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/lisp/ldg-post.el b/lisp/ldg-post.el index 338264f5..4f80b425 100644 --- a/lisp/ldg-post.el +++ b/lisp/ldg-post.el @@ -251,15 +251,6 @@ BEG, END, and LEN control how far it can align." (add-hook 'after-save-hook #'(lambda () (setq ledger-post-current-list nil)) t t)) -(defun ledger-post-read-account-with-prompt (prompt) - (let* ((context (ledger-context-at-point)) - (default - (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))) - (provide 'ldg-post) |