>From TeX.SE, the following solution works; however, it doesn't feel like
the "ConTeXt way":

% SOT
\setuplocalboxes[leftmargin][
    style=\bfd,
    color=darkred,
    distance=0pt,
]

\unprotect
\define\quoteinitial{%
    \futureexpandisap“\quoteinitial_true\quoteinitial_false%
}

\define\quoteinitial_true{%
    \localmargintext[leftmargin]{“}%
    \expandafter\placeinitial%
    \gobbleoneargument%
}

\let\quoteinitial_false\placeinitial
\protect

\starttext
    \quoteinitial “We held ConTeXt in high esteem.” \samplefile{bryson}

    \quoteinitial We held ConTeXt in high esteem.   \samplefile{bryson}
\stoptext
%EOT

Any suggestions for how to improve it?

See also: https://tex.stackexchange.com/q/722275/2148

Thanks again!
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the 
Wiki!

maillist : ntg-context@ntg.nl / 
https://mailman.ntg.nl/mailman3/lists/ntg-context.ntg.nl
webpage  : https://www.pragma-ade.nl / https://context.aanhet.net (mirror)
archive  : https://github.com/contextgarden/context
wiki     : https://wiki.contextgarden.net
___________________________________________________________________________________

Reply via email to