summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRémi Vanicat <vanicat@debian.org>2013-02-08 18:16:57 +0100
committerRémi Vanicat <vanicat@debian.org>2013-02-08 21:15:48 +0100
commit21968b1e126df258842a6a45d2141f2923f7b023 (patch)
tree2faa7fbb8dac985b4a73a12ef3245bbabb9f3fe9 /lisp
parent3b44a9fd2aec421eee2136088edd07efeb330f92 (diff)
downloadfork-ledger-21968b1e126df258842a6a45d2141f2923f7b023.tar.gz
fork-ledger-21968b1e126df258842a6a45d2141f2923f7b023.tar.bz2
fork-ledger-21968b1e126df258842a6a45d2141f2923f7b023.zip
In ledger-reconcile, open file where transaction are, and store it.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ldg-reconcile.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/ldg-reconcile.el b/lisp/ldg-reconcile.el
index 04c84e63..ae8de63f 100644
--- a/lisp/ldg-reconcile.el
+++ b/lisp/ldg-reconcile.el
@@ -169,10 +169,12 @@
"find the position of the xact in the ledger-buf buffer using
the emacs output from ledger, return a marker to the beginning
of the xact in the buffer"
- (let ((buf ledger-buf))
+ (let ((buf (if (is-stdin emacs-xact)
+ ledger-buf
+ (find-file-noselect (nth 0 item)))))
(with-current-buffer buf ;use the ledger-buf buffer
(cons
- (nth 0 item)
+ buf
(if ledger-clear-whole-entries ;determines whether to
;clear on the payee line
;or posting line