Pass start argument of cre-search? to regexp-match.

This commit is contained in:
mainzelm 2002-08-05 14:22:11 +00:00
parent cad4096910
commit f172795016
1 changed files with 1 additions and 1 deletions

View File

@ -114,4 +114,4 @@
(if (not (cre:regexp/nm cre)) (if (not (cre:regexp/nm cre))
(set-cre:regexp/nm cre (make-regexp re-str (set-cre:regexp/nm cre (make-regexp re-str
(regexp-option extended)))) (regexp-option extended))))
(regexp-match (cre:regexp/nm cre) str #f #f #f))))) (regexp-match (cre:regexp/nm cre) str #f #f #f start)))))