[racket] scribble: colored text

At Tue, 15 Jan 2013 23:22:40 -0700, Jon Rafkind wrote:
> Is there a way to output colored text? Right now I only care about latex 
> output. Something like..
> 
> These words will appear in normal black but the next word will be 
> @blue-text{blue!}.


#lang scribble/base
@(require scribble/core)

@(define (blue-text . s)
  @elem[s #:style (style #f (list (color-property "blue")))])

This is @blue-text{blue}.