Hans Hagen schrieb am 30.12.2019 um 10:19:
On 12/30/2019 5:03 AM, Sam May wrote:
\setuplanguage[en]
[leftquotation=\quotedash~,
rightquotation=~\quotedash,
leftsentence=\removeunwantedspaces~\endash\space,
midsentence=\removeunwantedspaces~\endash\space,
% leftsentence=\endash~,
% midsentence=~\endash,
rightsentence=~\endash]
\define\quotedash{\emdash\endash}
%\setupbackend[export=yes]
\starttext
\startsection[title=Introduction]
Any of you able to help me get my quotation dashes into line when
automatically
inserted by the semantic commands? I'm sure a number of you look at
this style
and cringe, but \cap{A.} I'm not looking for grammatical input, and
\cap{B.}
I'm intending this for a non-English language where the quotation dash
(though
still not most common) isn't as out of place.
\stopsection
\startsection[title=Desired rendering]
\quotedash~Speech should always have a dash at the start, but none at
the end
of a paragraph.
\quotedash~Dialog asides should not duplicate dashes,~\endash\ he
said.~\quotedash\ Also, this doesn't reflect the spacing mentioned in
section
\in[extra]. \quotedash~nor, as above, add ones at the end of paragraphs.
\endash~he continued.
\stopsection
\startsection[title=Actual output]
\speech{Speech should always have a dash at the start, but none at the
end of a
paragraph.}
\speech{Dialog asides should not duplicate dashes, \aside{he said.}}
Also, note
the spacing isn't removed despite \type{\removeunwantedspaces}, but
instead
duplicated. \speech{nor, as above, add ones at the end of paragraphs.
\aside{he continued.}}
\stopsection
\startsection[title=Additional considerations and
observations,reference=extra]
It would also be nice if a quote ending in a period carried the
\quote{broad}
spacing to the other side of the (ending) quote dash |=| the dash before
\quote{Also} above would be packed on the left and broad on the right.
I know
this might be a lot trickier to code, and only consider it a bonus.
The issue with \type{\removeunwantedspaces} only seems to affect the
command
forms. When inserted directly |<| as here |>| the spacing acts as
desired in
the \cap{PDF} (as expected, the \cap{XML} doesn't understand the
order). Also,
the right \type{|>|} doesn't require either of the explicit spacing
instructions (beyond being non-breaking) while the others do; try
switching the
commented lines and re-rendering.
The quotation dash itself only \emph{looks} as I want it; when I
highlight and
copy the text or export it to the \cap{XML} backend, it's still two
dashes next
to each other. Instead, I'd like it to be the Unicode bar U+2015.
I'm not
sure if \TEX/\LUATEX\ allows that difference between appearance and
interaction
(I do know \cap{PDF} does), so if there's some way of adding a new
glyph to the
font |<| one that mimics the other dashes even if the font changes |>|
I'd love
to actually use the proper codepoint. As is, that doesn't work in the
standard
font(s): [\char"2015].
\stopsection
\stoptext
I bet that Wolfgang has the answers to the speech setup so I'll do the
font part.
It's possible to use leaders to remove multiple dashes and also dashes
at the end of a paragraph but this will only work for the PDF. A
limitation is that you can't use the existing \speech and \aside
commands because they use groups which prevents the removal of unwanted
dashes.
\unprotect
\def\speech_dash
{\setbox\scratchbox\hbox{\texthorizontalbar\space}%
\leaders\copy\scratchbox\hskip\wd\scratchbox}
\def\speech_left
{\ifhmode
\removeunwantedspaces
\else
\dontleavehmode
\fi
\space\speech_dash}
\def\speech_right
{\removeunwantedspaces
\space\speech_dash}
%\define[1]\speech
% {\speech_left#1\speech_right}
\unexpanded\def\speech
{\speech_left
\bgroup
\aftergroup\speech_right
\let\next=}
\def\aside_dash
{\setbox\scratchbox\hbox{\endash\space}%
\leaders\copy\scratchbox\hskip\wd\scratchbox}
\def\aside_left
{\ifhmode
\removeunwantedspaces
\else
\dontleavehmode
\fi
\space\aside_dash}
\def\aside_right
{\space\aside_dash}
%\define[1]\aside
% {\aside_left#1\aside_right}
\unexpanded\def\aside
{\aside_left
\bgroup
\aftergroup\aside_right
\let\next=}
\protect
\setupbodyfont[pagella]
\starttext
\speech{first speech} \speech{second speech}
\speech{first speech} no speech \speech{second speech}
\speech{first speech\aside{aside}} \speech{second speech}
\speech{speech \aside{aside}} no speech
\stoptext
Wolfgang
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the
Wiki!
maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___________________________________________________________________________________
