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

commit e4a2ca5ac1dafaa9841c7105ad4bc7197dec006f
parent 36569a05b494ac04d1ea55b1debcd91a439f5982
Author: Eli Barzilay <eli@racket-lang.org>
Date:   Mon, 16 Feb 2009 16:44:34 +0000

no underlines

svn: r13672

original commit: a016d20e847be63a16b8c0640869f52ec55b68c2

Diffstat:
M
collects/games/chat-noir/literate-doc-wrapper.ss
 | 
5
+++--

1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/collects/games/chat-noir/literate-doc-wrapper.ss b/collects/games/chat-noir/literate-doc-wrapper.ss
@@ -40,7 +40,8 @@
                    (list (elemtag '(chunk tag) (italic (scheme name) " ::=")))
                    (list (make-element
                           "smaller"
-                          (list (elemref '(chunk tag) str more ...)))))
+                          (list (elemref '(chunk tag) #:underline? #f
+                                         str more ...)))))
                   (schemeblock expr ...)))))]))
 
 (define-syntax (chunkref stx)
@@ -48,7 +49,7 @@
     [(_ id)
      (identifier? #'id)
      (with-syntax ([str (format "~a" (syntax-e #'id))])
-       #'(elemref '(chunk str) str))]))
+       #'(elemref '(chunk str) #:underline? #f str))]))
 
 ;; HACK: provide a fake `module', which makes it possible to include a module
 ;; and get only its code in.