Merge pull request #59 from AlexKnauth/lexer

add color-lexer for #lang pollen
pull/84/head
Matthew Butterick 10 years ago
commit 67e1cd98d6

1
.gitignore vendored

@ -1,5 +1,6 @@
# for Racket # for Racket
compiled/ compiled/
*~
# for Mac OS X # for Mac OS X
.DS_Store .DS_Store

@ -66,5 +66,11 @@
(define (get-info in mod line col pos) (define (get-info in mod line col pos)
(λ (key default) (λ (key default)
(case key (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]))) [else default])))
(provide (rename-out [custom-read read] [custom-read-syntax read-syntax]) get-info))) (provide (rename-out [custom-read read] [custom-read-syntax read-syntax]) get-info)))
Loading…
Cancel
Save