From 7a141091c871f6446a68f9a5623dba2efb54873a Mon Sep 17 00:00:00 2001 From: Andrey Kotlarski Date: Mon, 26 Aug 2013 12:29:39 +0300 Subject: [PATCH] Fix search for GNU Emacs 23 (no assert). --- vlf.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/vlf.el b/vlf.el index 5a2ce16..b5c7f3e 100644 --- a/vlf.el +++ b/vlf.el @@ -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))))