mirror of
https://github.com/m00natic/vlfi.git
synced 2025-01-18 20:10:47 +00:00
Return to current position after occur ending with quit.
This commit is contained in:
parent
c827c3e186
commit
4589c25d96
6
vlfi.el
6
vlfi.el
@ -619,9 +619,9 @@ Prematurely ending indexing will still show what's found so far."
|
||||
(pos (point)))
|
||||
(vlfi-beginning-of-file)
|
||||
(goto-char (point-min))
|
||||
(vlfi-build-occur regexp)
|
||||
(vlfi-move-to-chunk start-pos end-pos)
|
||||
(goto-char pos)))
|
||||
(unwind-protect (vlfi-build-occur regexp)
|
||||
(vlfi-move-to-chunk start-pos end-pos)
|
||||
(goto-char pos))))
|
||||
|
||||
(defun vlfi-build-occur (regexp)
|
||||
"Build occur style index for REGEXP."
|
||||
|
Loading…
x
Reference in New Issue
Block a user