doc corrections in quick and guide

svn: r7880 original commit: 58684c1b0bbc7f06d310ece6252f32cdc8aa3d5f
2007-12-01 01:47:32 +00:00 · 2007-12-01 01:47:32 +00:00 · f8be6eb9db
commit f8be6eb9db
parent 104767d7e3
1 changed files with 4 additions and 1 deletions
--- 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 ...))]))