bkyk8rc3zvpnsf5inmcqq4n3k98cv6hj-my-site-hyper-literate-git.test.suzanne.soy-0.0.1

commit 57304714b13beedce99dd9dd6c61e27845077854
parent 02155752e6c0f6c351a9a165bcf86fe39665d5e8
Author: Matthew Flatt <mflatt@racket-lang.org>
Date:   Thu, 15 Apr 2010 19:15:53 -0400

fix Scribble reader test regexp-split pattern

original commit: 2fb34bcfdc3c9d7cabb81a0b02aa78d8569e62aa

Diffstat:
M
collects/tests/scribble/reader.ss
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/collects/tests/scribble/reader.ss b/collects/tests/scribble/reader.ss
@@ -920,7 +920,7 @@ END-OF-TESTS
            ;; remove all comment lines
            [ts (regexp-replace* #px"(?m:^;.*\r?\n)" ts "")]
            ;; split the tests
-           [ts (regexp-split #px"(?:^|\r?\n)-+(?:$|\r?\n)" ts)])
+           [ts (regexp-split #px"(?m:^)-+(?:$|\r?\n)" ts)])
       (parameterize ([port-count-lines-enabled #t])
         (for ([t ts] #:when (not (regexp-match? #px"^\\s*$" t)))
           (let ([m (or (regexp-match #px"^(.*)\n\\s*(-\\S+->)\\s*\n(.*)$"