[dev-context] typo-mar.mkiv

[Wolfgang Schuster]

Hi,

there are a two \dosetupstrut commands which have to be changed.

\unexpanded\def\typo_margins_data_yes_indeed[#dataparameters][#textparameters]#content%
  {\iffirstargument
     \setupcurrentmargindata[#dataparameters]%
   \fi
   \doifelsenothing{#content}\donefalse\donetrue
   \ifdone
     \edef\currentmarginreference{\margindataparameter\c!reference}%
     \ifx\currentmarginreference\empty \else
       \strc_references_set_page_only_destination_box_attribute\currentmarginreference\currentmarginreference
     \fi
     \edef\currentmargindatastrut{\margindataparameter\c!strut}%
     \dostarttagged\t!margintext\currentmargindata
     \ifcsname\currentmarginframedhash\s!parent\endcsname
       \setbox\nextbox\hbox \currentmarginreference \bgroup
         \the\everymargindatacontent
         \usemargindatastyleandcolor\c!style\c!color
         \setupcurrentmarginframed[\c!location=\v!normal,#textparameters]%
         \inheritedmarginframedframed\bgroup
           \ifx\currentmargindatastrut\empty \else
-            \setupstrut[\currentmargindatastrut]%
+            \synchronizestrut\currentmargindatastrut
           \fi
           \begstrut\margindataparameter\c!command{#content}\endstrut
         \egroup
       \egroup
       \edef\currentmarginfirstheight{\number\dimexpr\framedfirstheight}%
     \else
       \edef\currentmargindatawidth{\margindataparameter\c!width}%
       \ifx\currentmargindatawidth\empty
         \setbox\nextbox\hbox \currentmarginreference \bgroup
           \the\everymargindatacontent
           \usemargindatastyleandcolor\c!style\c!color
           \ifx\currentmargindatastrut\empty \else
-            \dosetupstrut[\currentmargindatastrut]%
+            \synchronizestrut\currentmargindatastrut
           \fi
           \begstrut\margindataparameter\c!command{#content}\endstrut
         \egroup
         \let\currentmarginfirstheight\empty
       \else
         \dosetraggedcommand{\margindataparameter\c!align}%
         \setbox\nextbox\hbox \currentmarginreference \bgroup
           \vtop \bgroup
             \the\everymargindatacontent
             \usemargindatastyleandcolor\c!style\c!color
             \hsize\currentmargindatawidth
             \raggedcommand
             \ifx\currentmargindatastrut\empty \else
-              \dosetupstrut[\currentmargindatastrut]%
+              \synchronizestrut\currentmargindatastrut
             \fi
             \begstrut\margindataparameter\c!command{#content}\endstrut
           \egroup
         \egroup
         \edef\currentmarginfirstheight{true}%
       \fi
     \fi
     \dostoptagged
   \fi
   ...
   \endgroup}

Wolfgang