mirror of
https://github.com/m00natic/vlfi.git
synced 2025-01-31 02:00:47 +00:00
Fix prematurely ending search/occur not to ask for modified buffer
confirmation.
This commit is contained in:
parent
931ca52688
commit
2ac3e7d577
2
vlf.el
2
vlf.el
@ -554,6 +554,7 @@ BATCH-STEP is amount of overlap between successive chunks."
|
|||||||
(progress-reporter-update reporter
|
(progress-reporter-update reporter
|
||||||
vlf-end-pos)))))
|
vlf-end-pos)))))
|
||||||
(progress-reporter-done reporter))
|
(progress-reporter-done reporter))
|
||||||
|
(set-buffer-modified-p nil)
|
||||||
(if backward
|
(if backward
|
||||||
(vlf-goto-match match-chunk-start match-chunk-end
|
(vlf-goto-match match-chunk-start match-chunk-end
|
||||||
match-end-pos match-start-pos
|
match-end-pos match-start-pos
|
||||||
@ -841,6 +842,7 @@ Prematurely ending indexing will still show what's found so far."
|
|||||||
last-line-pos (line-beginning-position))
|
last-line-pos (line-beginning-position))
|
||||||
(progress-reporter-update reporter vlf-end-pos))))
|
(progress-reporter-update reporter vlf-end-pos))))
|
||||||
(progress-reporter-done reporter))
|
(progress-reporter-done reporter))
|
||||||
|
(set-buffer-modified-p nil)
|
||||||
(if (zerop total-matches)
|
(if (zerop total-matches)
|
||||||
(progn (with-current-buffer occur-buffer
|
(progn (with-current-buffer occur-buffer
|
||||||
(set-buffer-modified-p nil))
|
(set-buffer-modified-p nil))
|
||||||
|
Loading…
x
Reference in New Issue
Block a user