[metapost] Re: [metafont] [question about metapost]How to make color text in boxes?

[Laurence Finston]

On Sun, 23 Jan 2005, Hartmut Henkel wrote:

> beginfig(1);
> label(btex $A$ etex, origin) withcolor red;
> endfig;
> end
>

Very nice, and thank you.  However, this fails:

beginfig(1);
dotlabel(btex $A$ etex, origin) withcolor red;
endfig;
end;

! Extra tokens will be flushed.
<to be read again>
                   withcolor
l.2 dotlabel(btex $A$ etex, origin) withcolor
                                              red;
?

This works:

picture p;

p := nullpicture;
addto p also btex $A$ etex withcolor red;

beginfig(1);
dotlabel.top(p, origin);
endfig;
end;

I think if it works for `label', it ought to work for `dotlabel', too.

Laurence