fix scribble/doc reader's get-info

svn: r16574
2009-11-06 18:18:43 +00:00 · 2009-11-06 18:18:43 +00:00 · 8f62218de5
commit 8f62218de5
parent 26ff29b12f
1 changed files with 2 additions and 2 deletions
--- 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])))