String delim matchers are supposed to be interpreted in POSIX flat

syntax.
This commit is contained in:
sperber 2001-07-11 11:30:38 +00:00
parent 9c560cf537
commit df37fa6cae
1 changed files with 1 additions and 1 deletions

View File

@ -69,7 +69,7 @@
(define (->delim-matcher x)
(if (procedure? x) x ; matcher proc
(let ((re (cond ((string? x) (re-string x))
(let ((re (cond ((string? x) (posix-string->regexp x))
((char-set? x) (re-char-set x))
((char? x) (re-string (string x)))
((regexp? x) x)