diff options
author | Craig Earls <enderw88@gmail.com> | 2013-02-20 20:46:38 -0700 |
---|---|---|
committer | Craig Earls <enderw88@gmail.com> | 2013-02-20 20:46:38 -0700 |
commit | 8029fd1149a607ee2eed7712194904b6c711d4b4 (patch) | |
tree | 46f997faa543d21656e167d1640b9baf30b89310 | |
parent | f54c15bdf575377383923d368f5de2b5e56a7669 (diff) | |
download | fork-ledger-8029fd1149a607ee2eed7712194904b6c711d4b4.tar.gz fork-ledger-8029fd1149a607ee2eed7712194904b6c711d4b4.tar.bz2 fork-ledger-8029fd1149a607ee2eed7712194904b6c711d4b4.zip |
Run ledger-highlight-xact-under-point when reconcile quits, so only one xact is highlighted
-rw-r--r-- | lisp/ldg-reconcile.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ldg-reconcile.el b/lisp/ldg-reconcile.el index 602d918e..9ac89915 100644 --- a/lisp/ldg-reconcile.el +++ b/lisp/ldg-reconcile.el @@ -250,7 +250,9 @@ and exit reconcile mode" (with-current-buffer buf (remove-hook 'after-save-hook 'ledger-reconcile-refresh-after-save t) (if ledger-fold-on-reconcile - (ledger-occur-quit-buffer buf)))))) + (progn + (ledger-occur-quit-buffer buf) + (ledger-highlight-xact-under-point))))))) (defun ledger-marker-where-xact-is (emacs-xact posting) "Find the position of the EMACS-XACT in the `ledger-buf'. |