diff options
author | Hans Hagen <pragma@wxs.nl> | 2012-01-05 19:27:53 +0100 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2012-01-05 19:27:53 +0100 |
commit | 4b459764a30ae1fb1e124b1a7a5a44ecb5a4d54b (patch) | |
tree | c40189f3df34d9843149b5b0154b424df8de02dd /tex/context/base/page-imp.mkiv | |
parent | f55d2b463bb22fc74c5da3a3e0a699901540f727 (diff) | |
download | context-4b459764a30ae1fb1e124b1a7a5a44ecb5a4d54b.tar.gz |
beta 2011.12.31 13:16
Diffstat (limited to 'tex/context/base/page-imp.mkiv')
-rw-r--r-- | tex/context/base/page-imp.mkiv | 24 |
1 files changed, 14 insertions, 10 deletions
diff --git a/tex/context/base/page-imp.mkiv b/tex/context/base/page-imp.mkiv index d18f78140..1804f9f95 100644 --- a/tex/context/base/page-imp.mkiv +++ b/tex/context/base/page-imp.mkiv @@ -51,6 +51,10 @@ % \def\pagestoshipout{1,3,5} % \stoptypen +\installcorenamespace{layouthandler} +\installcorenamespace{layoutarranger} +\installcorenamespace{layoutarrangeoption} + \newcount \shippedoutpages \newcount \combinedpagescounter @@ -61,14 +65,14 @@ \setnewconstant\shipoutfinalizemethod\plusone % this will be default (we will have two finalizers) -\def\installpagehandler#1#2% % a handler takes one argument: something to be boxed - {\setgvalue{\??pp:h:#1}##1{#2{##1}}} % and shipped out (don't depend on the exact package) +\def\installpagehandler#1#2% % a handler takes one argument: something to be boxed + {\setgvalue{\??layouthandler#1}##1{#2{##1}}} % and shipped out (don't depend on the exact package) \unexpanded\def\invokepagehandler#1% - {\expandcheckedcsname{\??pp:h:}{#1}\v!normal} + {\expandcheckedcsname{\??layouthandler}{#1}\v!normal} \def\page_shipouts_handle - {\csname\??pp:h:\ifcsname\??pp:h:\v_page_target_method\endcsname + {\csname\??layouthandler\ifcsname\??layouthandler\v_page_target_method\endcsname \v_page_target_method \else \v!none @@ -198,17 +202,17 @@ \newcount\arrangedpageX \arrangedpageX\plusone \newcount\arrangedpageY \arrangedpageY\plusone -\def\pages_paper_set_offsets +\def\page_paper_set_offsets {\global\paperoffset\v_page_target_offset \global\advance\paperwidth -2\dimexpr\paperoffset/\arrangedpageX\relax \global\advance\paperheight-2\dimexpr\paperoffset/\arrangedpageY\relax} \def\doinstallarrangedoption#1#2% - {\setvalue{\??pp:o:#1}{#2}} + {\setvalue{\??layoutarrangeoption#1}{#2}} \def\doinstalledarrangedoption#1% - {\ifcsname\??pp:o:#1\endcsname - \csname\??pp:o:#1\endcsname + {\ifcsname\??layoutarrangeoption#1\endcsname + \csname\??layoutarrangeoption#1\endcsname \else \checkinstalledpagearrangement{#1}% this installs the arranger \fi} @@ -275,10 +279,10 @@ \fi} \def\installpagearrangement #1 % will lchange, no space - {\setgvalue{\??pp:a:#1}} + {\setgvalue{\??layoutarranger#1}} \def\checkinstalledpagearrangement#1% can be empty: aaa,,bbb - {\executeifdefined{\??pp:a:#1}\donothing} + {\executeifdefined{\??layoutarranger#1}\donothing} \let\poparrangedpages\relax \let\pusharrangedpage\relax |