diff options
author | Hans Hagen <pragma@wxs.nl> | 2019-08-18 22:51:53 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2019-08-18 22:51:53 +0200 |
commit | f72c2cf29d36ae836c894bad29dfd965d1af0236 (patch) | |
tree | 48ad8b3bf6b60b91118b5573ebcf9ea783285dfb /metapost/context/base/mpiv/mp-page.mpiv | |
parent | 91b59bb4f8b33701c69e095841fe4cf57971ac20 (diff) | |
download | context-f72c2cf29d36ae836c894bad29dfd965d1af0236.tar.gz |
2019-08-18 22:26:00
Diffstat (limited to 'metapost/context/base/mpiv/mp-page.mpiv')
-rw-r--r-- | metapost/context/base/mpiv/mp-page.mpiv | 38 |
1 files changed, 16 insertions, 22 deletions
diff --git a/metapost/context/base/mpiv/mp-page.mpiv b/metapost/context/base/mpiv/mp-page.mpiv index 18e28d6ca..7bc7c127c 100644 --- a/metapost/context/base/mpiv/mp-page.mpiv +++ b/metapost/context/base/mpiv/mp-page.mpiv @@ -177,14 +177,13 @@ boolean context_page ; context_page := true ; % the new way: -def LoadPageState = - % now always set -enddef ; +def LoadPageState = enddef ; % now always set +def SwapPageState = enddef ; % dynamic -if unknown PageStateAvailable : - boolean PageStateAvailable ; - PageStateAvailable := false ; -fi ; +% if unknown PageStateAvailable : +% boolean PageStateAvailable ; +% PageStateAvailable := false ; +% fi ; % Next we implement the the page area model. First some constants. @@ -462,13 +461,11 @@ enddef ; def StartPage = begingroup ; - if mfun_first_run : - if PageStateAvailable : - LoadPageState ; - SwapPageState ; - fi ; - SetPageVariables ; - fi ; + % if PageStateAvailable : + % LoadPageState ; + % SwapPageState ; + % fi ; + SetPageVariables ; BoundPageAreas ; enddef ; @@ -488,14 +485,11 @@ let SetCoverAreas = SetPageVariables ; % compatiblity def StartCover = begingroup ; - if mfun_first_run : - if PageStateAvailable : - LoadPageState ; - % SwapPageState ; - fi ; - SetPageVariables ; % was SetPageAreas ; - SetCoverAreas ; - fi ; + % if PageStateAvailable : + % LoadPageState ; + % fi ; + SetPageVariables ; % was SetPageAreas ; + SetCoverAreas ; BoundCoverAreas ; enddef ; |