diff options
| -rw-r--r-- | lisp/ldg-occur.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/ldg-occur.el b/lisp/ldg-occur.el index 09cca45b..2958c94c 100644 --- a/lisp/ldg-occur.el +++ b/lisp/ldg-occur.el @@ -89,8 +89,9 @@ (setq ledger-occur-overlay-list (append ledger-occur-overlay-list (ledger-occur-create-folded-overlays buffer-matches))) - (setq ledger-occur-last-match regex)) - (recenter)))) + (setq ledger-occur-last-match regex) + (select-window (get-buffer-window buffer)))) + (recenter))) (defun ledger-occur (regex) "Perform a simple grep in current buffer for the regular |