diff options
| author | Craig Earls <enderw88@gmail.com> | 2013-02-07 10:16:31 -0700 |
|---|---|---|
| committer | Craig Earls <enderw88@gmail.com> | 2013-02-07 10:16:31 -0700 |
| commit | 869c40c070a1abd8a02f8817a43cfc1488c0b1bc (patch) | |
| tree | d2dc7490ab471f488e024b01581c2daa677e8e50 | |
| parent | e3431c4bffd57c39e96779a8449fe08679857448 (diff) | |
| download | fork-ledger-869c40c070a1abd8a02f8817a43cfc1488c0b1bc.tar.gz fork-ledger-869c40c070a1abd8a02f8817a43cfc1488c0b1bc.tar.bz2 fork-ledger-869c40c070a1abd8a02f8817a43cfc1488c0b1bc.zip | |
Reconcile visit now recanters on the xact selected
| -rw-r--r-- | lisp/ldg-reconcile.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ldg-reconcile.el b/lisp/ldg-reconcile.el index 22ad5bc1..2d591de5 100644 --- a/lisp/ldg-reconcile.el +++ b/lisp/ldg-reconcile.el @@ -126,7 +126,8 @@ (let ((where (get-text-property (point) 'where))) (when (is-stdin (car where)) (switch-to-buffer-other-window ledger-buf) - (goto-char (cdr where))))) + (goto-char (cdr where)) + (recenter)))) (defun ledger-reconcile-save () (interactive) |