[NTG-context] little coding assistance (please)

16 Nov 2007

      Hi,

I need some help for shorten the TeX code in the following example:

My footnotes are defined like this:

  \def\setnotebodyfont
    {\let\setnotebodyfont\relax
     \restoreglobalbodyfont
    \switchtobodyfont[rm,9pt]\setupinterlinespace[line=9.8pt] 
\parskip2pt}

But sometimes at single pages I need to shrink footnote's  
setupinterlinespace and parskip a bit.
To adjust the percentage of shrinking (setupinterlinespace[line= 
\dimexpr(9.8\MyFaktor)]\parskip\dimexpr(2\MyFaktor)}) I use the  
following:

\newdimen\MyFaktor
\MyFaktor=0.978pt

[Normal body-text ...]
  \def\setnotebodyfont
    {\let\setnotebodyfont\relax
     \restoreglobalbodyfont
    \switchtobodyfont[rm,9pt]\setupinterlinespace[line=\dimexpr(9.8 
\MyFaktor)]\parskip\dimexpr(2\MyFaktor)}
[...] Text with footnotes [...]
  \def\setnotebodyfont
    {\let\setnotebodyfont\relax
     \restoreglobalbodyfont
    \switchtobodyfont[rm,9pt]\setupinterlinespace[line=9.8pt] 
\parskip2pt}
[...]

This works great, but looks ugly and not clear at all!!

Could someone please provide me a definition like \ThightNotes[0.978]  
and \NormalNotes that I could hook handy and clear in the respective  
body-text?

Thanks in advance,

Steffen

[NTG-context] little coding assistance (please)

Steffen Wolfrum