sascha/vlfi
1
0
Fork 0
mirror of https://github.com/m00natic/vlfi.git synced 2025-11-04 00:51:37 +00:00
Code Issues Releases Wiki Activity

Fix search for GNU Emacs 23 (no assert).

Browse Source
This commit is contained in:
Andrey Kotlarski
2013-08-26 12:29:39 +03:00
parent 8ab1c6a4f2
commit 7a141091c8
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
vlf.el
View File

@@ -439,7 +439,8 @@ bytes added to the end."
(defun vlf-re-search (regexp count backward batch-step)
"Search for REGEXP COUNT number of times forward or BACKWARD.
BATCH-STEP is amount of overlap between successive chunks."
(assert (< 0 count))
(if (<= count 0)
(error "Count must be positive"))
(let* ((match-chunk-start vlf-start-pos)
(match-chunk-end vlf-end-pos)
(match-start-pos (+ vlf-start-pos (position-bytes (point))))