Am 10.03.10 17:10, schrieb Hans van der Meer:
\scratchdimen=\the\dimexpr\bodyfontsize\relax
\advance\scratchdimen-\xmlattdef{#1}{step}{2pt}\relax
\ifdim\scratchdimen<\xmlattdef{#1}{min}{4pt}\relax\scratchdimen=\xmlattdef{#1}{min}{4pt}\fi
\scratchdimen\ifdim\bodyfontsize<\xmlattdef{#1}{min}{4pt}\relax
  \xmlattdef{#1}{min}{4pt}
\else
  \bodyfontsize-\xmlattdef{#1}{step}{2pt}
\fi

\switchtobodyfont[\the\scratchdimen]

or

\switchtobodyfont
  [\the\dimexpr\ifdim\bodyfontsize<\xmlattdef{#1}{min}{4pt}\relax
     \xmlattdef{#1}{min}{4pt}
   \else
     \bodyfontsize-\xmlattdef{#1}{step}{2pt}
   \fi\relax]

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://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Reply via email to