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

Corrected reentering when entering leg-occur mode

Browse source
This commit is contained in:
Craig Earls 2013-02-08 07:41:42 -07:00
parent 995aa43778
commit bdf404112e
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ldg-occur.el
View file

@ -89,8 +89,9 @@
(setq ledger-occur-overlay-list (setq ledger-occur-overlay-list
(append ledger-occur-overlay-list (append ledger-occur-overlay-list
(ledger-occur-create-folded-overlays buffer-matches))) (ledger-occur-create-folded-overlays buffer-matches)))
(setq ledger-occur-last-match regex)) (setq ledger-occur-last-match regex)
(recenter)))) (select-window (get-buffer-window buffer))))
(recenter)))
(defun ledger-occur (regex) (defun ledger-occur (regex)
"Perform a simple grep in current buffer for the regular "Perform a simple grep in current buffer for the regular