diff options
author | Hans Hagen <pragma@wxs.nl> | 2020-07-09 15:15:53 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-07-09 15:15:53 +0200 |
commit | b4260c7c04f7e82a9987b7bb758040853ebc464e (patch) | |
tree | 4191ca6d239722bb18d796f42a4fb8557f1e4a5c /tex/context/base/mkiv/page-lay.mkiv | |
parent | 563c81a9faf538d1d1f362dc0a5e3bccc0de8023 (diff) | |
download | context-b4260c7c04f7e82a9987b7bb758040853ebc464e.tar.gz |
2020-07-09 14:50:00
Diffstat (limited to 'tex/context/base/mkiv/page-lay.mkiv')
-rw-r--r-- | tex/context/base/mkiv/page-lay.mkiv | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/tex/context/base/mkiv/page-lay.mkiv b/tex/context/base/mkiv/page-lay.mkiv index d115b588d..53e95460a 100644 --- a/tex/context/base/mkiv/page-lay.mkiv +++ b/tex/context/base/mkiv/page-lay.mkiv @@ -521,6 +521,8 @@ \edef\currentlayouttarget{#1}% \fi} +\newdimen\d_page_minimum_paper_size \d_page_minimum_paper_size\luaexpr{math.pi}\onebasepoint + \unexpanded\def\page_paper_set_current_indeed[#1][#2]% {\edef\m_page_asked_paper{#1}% can be the restores \edef\m_page_asked_print{#2}% @@ -539,11 +541,11 @@ \processcommacommand[\m_page_asked_paper]\page_paper_handle_page_option \global\paperwidth \layouttargetparameter\c!width \relax \global\paperheight\layouttargetparameter\c!height\relax - \ifdim\paperwidth<\onepoint - \global\paperwidth\onepoint + \ifdim\paperwidth<\d_page_minimum_paper_size + \global\paperwidth\d_page_minimum_paper_size \fi - \ifdim\paperheight<\onepoint - \global\paperheight\onepoint + \ifdim\paperheight<\d_page_minimum_paper_size + \global\paperheight\d_page_minimum_paper_size \fi \ifconditional\c_page_target_paper_landscape \doglobal\swapdimens\paperwidth\paperheight |