diff options
| author | Hans Hagen <pragma@wxs.nl> | 2004-08-15 00:00:00 +0200 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2004-08-15 00:00:00 +0200 |
| commit | 57f1545214ebba9625b9be722d4e4f9357dab87a (patch) | |
| tree | 29dd99fb0b08de5fca50a557e8af043ea082478a /tex/context/base/page-ini.tex | |
| parent | 599c5089a184d1967ec8dc66307de52378e911d4 (diff) | |
| download | context-57f1545214ebba9625b9be722d4e4f9357dab87a.tar.gz | |
stable 2004.08.15
Diffstat (limited to 'tex/context/base/page-ini.tex')
| -rw-r--r-- | tex/context/base/page-ini.tex | 37 |
1 files changed, 13 insertions, 24 deletions
diff --git a/tex/context/base/page-ini.tex b/tex/context/base/page-ini.tex index 2cd300ccf..37dbc8835 100644 --- a/tex/context/base/page-ini.tex +++ b/tex/context/base/page-ini.tex @@ -664,19 +664,6 @@ \newtoks \mainoutput \newcount\otrlevel -% Shipout handler (see page[stop] for example usage) - -\ifx\undefined\normalshipout \let\normalshipout=\shipout \fi - -\def\noshipout - {\writestatus\m!systems{ignoring further shipouts}% - \dowithnextbox{\deadcycles\zerocount}} - -\def\doignorerestoftext - {\ifarrangingpages \else \ifnum\textlevel>\zerocount \else - \globallet\shipout\noshipout - \fi \fi} - % When issuing two \par\penalty-\@M's, only the first % triggers the otr; obscure feature or optimization? @@ -1501,7 +1488,7 @@ \installpagebreakhandler \s!default {} % do nothing if empty -\installpagebreakhandler \v!reset +\installpagebreakhandler \v!reset {% better not: \global\chardef\pageornamentstate\zerocount \resetpagebreak} @@ -1696,14 +1683,16 @@ % We don't want spurious last pages (due to left over marks): +\ifx\undefined\normalshipout \let\normalshipout=\shipout \fi + +\def\noshipout + {\writestatus\m!systems{ignoring further shipouts}% + \dowithnextbox{\deadcycles\zerocount}} + \def\doignorerestoftext - {\ifarrangingpages \else - \ifnum\textlevel>\zerocount \else - \gdef\shipout - {\writestatus\m!systems{ignoring further shipouts}% - \dowithnextbox{\deadcycles\zerocount}}% - \fi - \fi} + {\ifarrangingpages \else \ifnum\textlevel>\zerocount \else + \globallet\shipout\noshipout + \fi \fi} \let\ignorerestoftext\donothing @@ -1711,9 +1700,9 @@ \globallet\ignorerestoftext\doignorerestoftext \to \everystarttext -\appendtoks - \ignorerestoftext -\to \everylastshipout +% \appendtoks +% \ignorerestoftext +% \to \everylastshipout \newif\ifgeselecteerd \geselecteerdtrue \newif\ifselecteren \selecterenfalse |