diff options
author | Hans Hagen <pragma@wxs.nl> | 2004-04-09 00:00:00 +0200 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2004-04-09 00:00:00 +0200 |
commit | ab3f887feadf929129087cd2cbc3783064507565 (patch) | |
tree | c0c12916ff903071880d0e157ff422b3f2cab2f4 /tex/context/base/page-bck.tex | |
parent | b3e51f52d2070a709e3089ada6054cd2080590ca (diff) | |
download | context-ab3f887feadf929129087cd2cbc3783064507565.tar.gz |
stable 2004.04.09
Diffstat (limited to 'tex/context/base/page-bck.tex')
-rw-r--r-- | tex/context/base/page-bck.tex | 50 |
1 files changed, 49 insertions, 1 deletions
diff --git a/tex/context/base/page-bck.tex b/tex/context/base/page-bck.tex index 720b9fa69..967679216 100644 --- a/tex/context/base/page-bck.tex +++ b/tex/context/base/page-bck.tex @@ -317,9 +317,37 @@ \appendtoks \setbackgroundoffsets \to \everybeforepagebody +% \def\setbackgroundbox#1#2% +% {\global\setbox#1\vbox +% {\dontcomplain +% \calculatereducedvsizes +% \offinterlineskip +% #2\relax +% \vskip-\bovenhoogte +% \vskip-\bovenafstand +% \dodopagebodybackground\v!boven\bovenhoogte +% \vskip\bovenafstand +% \dodopagebodybackground\v!hoofd\hoofdhoogte +% \vskip\hoofdafstand +% \dodopagebodybackground\v!tekst\teksthoogte +% \vskip\voetafstand +% \dodopagebodybackground\v!voet\voethoogte +% \vskip\onderafstand +% \dodopagebodybackground\v!onder\onderhoogte +% \vfilll}% +% \smashbox#1} + +\newconditional\swapbackgroundmargins \settrue\swapbackgroundmargins + \def\setbackgroundbox#1#2% {\global\setbox#1\vbox {\dontcomplain + \swapmargins + \ifconditional\swapbackgroundmargins + \doifmarginswapelse \donothing + {\swapmacros\v!rechtermarge\v!linkermarge + \swapmacros\v!rechterrand \v!linkerrand}% + \fi \calculatereducedvsizes \offinterlineskip #2\relax @@ -337,11 +365,31 @@ \vfilll}% \smashbox#1} +% \def\dodopagebodybackground#1#2% +% {\ifdim#2>\zeropoint % added, faster +% \setbox\scratchbox\vbox to #2 +% \bgroup\hbox\bgroup +% \swapmargins +% \goleftonpage +% \dododopagebodybackground\linkerrandbreedte #2#1\v!linkerrand +% \hskip\linkerrandafstand +% \dododopagebodybackground\linkermargebreedte #2#1\v!linkermarge +% \hskip\linkermargeafstand +% \dododopagebodybackground\zetbreedte #2#1\v!tekst +% \hskip\rechtermargeafstand +% \dododopagebodybackground\rechtermargebreedte#2#1\v!rechtermarge +% \hskip\rechterrandafstand +% \dododopagebodybackground\rechterrandbreedte #2#1\v!rechterrand +% \egroup\egroup +% \wd\scratchbox\zeropoint +% \box\scratchbox\relax +% \fi} + \def\dodopagebodybackground#1#2% {\ifdim#2>\zeropoint % added, faster \setbox\scratchbox\vbox to #2 \bgroup\hbox\bgroup - \swapmargins + % \swapmargins \goleftonpage \dododopagebodybackground\linkerrandbreedte #2#1\v!linkerrand \hskip\linkerrandafstand |