sfos/ledger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Reconcile code cleanup

Browse source
This commit is contained in:
Craig Earls 2013-03-14 11:37:12 -07:00
parent b608ed23e4
commit f89665ba44
1 changed files with 2 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ldg-reconcile.el
View file

@ -148,13 +148,11 @@ And calculate the target-delta of the account being reconciled."
"Force the reconciliation window to refresh.
Return the number of uncleared xacts found."
(interactive)
(let ((inhibit-read-only t)
(line (count-lines (point-min) (point))))
(let ((inhibit-read-only t))
(erase-buffer)
(prog1 (ledger-do-reconcile)
(set-buffer-modified-p t)
(goto-char (point-min))
(forward-line line))))
(goto-char (point-min)))))
(defun ledger-reconcile-refresh-after-save ()
"Refresh the recon-window after the ledger buffer is saved."