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

commit f8be6eb9dbcdf9e1bbfafa1cf18e900d02337951
parent 104767d7e356c4628156f123fbc39045f479bf1d
Author: Matthew Flatt <mflatt@racket-lang.org>
Date:   Sat,  1 Dec 2007 01:47:32 +0000

doc corrections in quick and guide

svn: r7880

original commit: 58684c1b0bbc7f06d310ece6252f32cdc8aa3d5f

Diffstat:
M
collects/scribble/manual.ss
 | 
5
++++-

1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/collects/scribble/manual.ss b/collects/scribble/manual.ss
@@ -45,7 +45,10 @@
       [(_ lang rest ...)
        (with-syntax ([modtag (datum->syntax
                               #'here
-                              `(unsyntax (schemefont ,(format "#lang ~a" (syntax-e #'lang))))
+                              `(unsyntax (make-element
+                                          #f
+                                          (list (schemefont ,(format "#lang "))
+                                                (schemeidfont ,(format "~s" (syntax-e #'lang))))))
                               #'lang)])
          #'(schemeblock modtag rest ...))]))