diff --git a/.gitignore b/.gitignore
index ddeb01f..9f475e5 100644
--- a/.gitignore
+++ b/.gitignore
@@ -1,5 +1,6 @@
 # for Racket
 compiled/
+*~
 
 # for Mac OS X
 .DS_Store
diff --git a/reader-base.rkt b/reader-base.rkt
index 666d619..a84688e 100644
--- a/reader-base.rkt
+++ b/reader-base.rkt
@@ -66,5 +66,11 @@
     (define (get-info in mod line col pos)
       (λ (key default)
         (case key
+          [(color-lexer)
+           (define make-scribble-inside-lexer2
+             (dynamic-require 'syntax-color/scribble-lexer 'make-scribble-inside-lexer (λ () #f)))
+           (cond [make-scribble-inside-lexer2
+                  (make-scribble-inside-lexer2 #:command-char #\◊)]
+                 [else default])]
           [else default])))
     (provide (rename-out [custom-read read] [custom-read-syntax read-syntax]) get-info)))
\ No newline at end of file