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

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README | LICENSE
commit 61b582b90b05d9046358c824413f8eb85f898764
parent 2f3fab3fc9831baee6477fffe2e741c4a6921288
Author: Matthew Flatt <mflatt@racket-lang.org>
Date:   Fri,  6 Nov 2009 18:18:43 +0000

fix scribble/doc reader's get-info

svn: r16574

original commit: 8f62218de5508aad57e87fa1237e49b54ce165a9

Diffstat:

Mcollects/scribble/doc/lang/reader.ss | 4++--


1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/collects/scribble/doc/lang/reader.ss b/collects/scribble/doc/lang/reader.ss
@@ -4,8 +4,8 @@
          get-info)
 
 (define (get-info . args)
-  (lambda (key)
+  (lambda (key defval)
     (case key
       [(color-lexer)
        (dynamic-require 'syntax-color/scribble-lexer 'scribble-inside-lexer)]
-      [else #f])))
+      [else defval])))