Hi,
\def\pack_framed_text_start_direct[#1]%
{\usebodyfontparameter\framedtextparameter
\iffirstargument
\setupcurrentframedtext[#1]%
\fi
- \edef\p_framed_text_strut{\letframedtextparameter\c!strut}%
+ \edef\p_framed_text_strut{\framedtextparameter\c!strut}%
\letframedtextparameter\c!strut\v!no
\inheritedframedtextframed\bgroup
\blank[\v!disable]%
\let\\=\endgraf
\useframedtextstyleandcolor\c!style\c!color
\vskip-\strutdp % brrr why is this needed ... needs to be sorted
out, see testcase 1
\framedtextparameter\c!inner
\ifx\p_framed_text_strut\v!no
\let\pack_framed_strut\relax
\else
\let\pack_framed_strut\strut
\fi
\bgroup
\aftergroup\pack_framed_text_stop_direct
\afterassignment\ignorespaces
\afterassignment\pack_framed_strut
\let\next=}
Wolfgang
_______________________________________________
dev-context mailing list
dev-context@ntg.nl
https://mailman.ntg.nl/mailman/listinfo/dev-context
