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

Reconcile visit now recanters on the xact selected

Browse source
This commit is contained in:
Craig Earls 2013-02-07 10:16:31 -07:00
parent e3431c4bff
commit 869c40c070
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ldg-reconcile.el
View file

@ -126,7 +126,8 @@
(let ((where (get-text-property (point) 'where))) (let ((where (get-text-property (point) 'where)))
(when (is-stdin (car where)) (when (is-stdin (car where))
(switch-to-buffer-other-window ledger-buf) (switch-to-buffer-other-window ledger-buf)
(goto-char (cdr where))))) (goto-char (cdr where))
(recenter))))
(defun ledger-reconcile-save () (defun ledger-reconcile-save ()
(interactive) (interactive)