[dev-context] \sometxt{broken} withcolor \MPcolor{currentcolor}

[Mojca Miklavec]

Hello Hans,

the following code doesn't work any more:

\setupcolors[state=start]

\starttext
\startMPcode
draw \sometxt{abc} withcolor \MPcolor{currentcolor};
\stopMPcode
\stoptext

If I say \color[red]{\startMPcode ... \stopMPcode} then it's OK, but
the "default" isn't.

Thanks a lot,
    Mojca



! Argument of \execcolorRCSP has an extra }.
<inserted text>
                \par
<to be read again>
                   }
\doTeXtext ... \scantokens {#3}\stopcurrentcolor }
                                                  \global \settrue \TeXtextd...

\dodofiltersometxt ...er \TeXtext \txtcounter {#1}
                                                  \expandafter \filtersometx...
<argument>
draw \sometxt {abc} wi
                                  thcolor \MPcolor {currentcolor};
\flushTeXtexts ...llectedmptexts \filtersometxt #1
                                                  \sometxt {}\empty \relax \...
...
l.7 \stopMPcode

?
! Emergency stop.
<inserted text>
                \par
<to be read again>
                   }
\doTeXtext ... \scantokens {#3}\stopcurrentcolor }
                                                  \global \settrue \TeXtextd...

\dodofiltersometxt ...er \TeXtext \txtcounter {#1}
                                                  \expandafter \filtersometx...
<argument>
draw \sometxt {abc} wi
                                  thcolor \MPcolor {currentcolor};
\flushTeXtexts ...llectedmptexts \filtersometxt #1
                                                  \sometxt {}\empty \relax \...
...
l.7 \stopMPcode