customize lexer for pollen/mode

pollen/mode.rkt

@@ -91,7 +91,8 @@ Intractable problem; unavoidable limitation.
                (fallback)))
          (case key
            [(color-lexer)
-            (try-dynamic-require 'syntax-color/scribble-lexer 'scribble-lexer)]
+            (define lexer-maker (try-dynamic-require 'syntax-color/scribble-lexer 'make-scribble-lexer))
+            (lexer-maker #:command-char #\◊)]
            [(drracket:indentation)
             (dynamic-require 'pollen/private/mode-indentation 'determine-spaces)]
            [else (fallback)]))))))

pollen/private/ts.rktd

@@ -1 +1 @@
-1511198469
+1511201538