summaryrefslogtreecommitdiff
path: root/tex/context/base/page-bck.tex
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2004-04-09 00:00:00 +0200
committerHans Hagen <pragma@wxs.nl>2004-04-09 00:00:00 +0200
commitab3f887feadf929129087cd2cbc3783064507565 (patch)
treec0c12916ff903071880d0e157ff422b3f2cab2f4 /tex/context/base/page-bck.tex
parentb3e51f52d2070a709e3089ada6054cd2080590ca (diff)
downloadcontext-ab3f887feadf929129087cd2cbc3783064507565.tar.gz
stable 2004.04.09
Diffstat (limited to 'tex/context/base/page-bck.tex')
-rw-r--r--tex/context/base/page-bck.tex50
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