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

commit c41c11a64b4038f7bb211ba44653f49fb01c4d13
parent e8ce285e5ae2d5a79193d536a9b8650e15d4be11
Author: Sam Tobin-Hochstadt <samth@racket-lang.org>
Date:   Mon, 31 Jan 2011 10:44:59 -0500

codeblock:
 fix language regexp to accept numbers in #lang

original commit: 6099806a7209d0d9e4ba85412dac0e13d8910111

Diffstat:
M
collects/scribble/private/manual-code.rkt
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/collects/scribble/private/manual-code.rkt b/collects/scribble/private/manual-code.rkt
@@ -121,7 +121,7 @@
                      [else null]))]
            [has-hash-lang? (regexp-match? #rx"^#lang " bstr)]
            [language (if has-hash-lang?
-                         (let ([m (regexp-match #rx"^#lang ([-a-zA-Z/._+]+)" bstr)])
+                         (let ([m (regexp-match #rx"^#lang ([-0-9a-zA-Z/._+]+)" bstr)])
                            (if m
                                (link-mod
                                 #:orig? #t