texlive[45501] Master/texmf-dist: bxpapersize (8oct17)
commits+karl at tug.org
commits+karl at tug.org
Mon Oct 9 00:42:56 CEST 2017
Revision: 45501
http://tug.org/svn/texlive?view=revision&revision=45501
Author: karl
Date: 2017-10-09 00:42:55 +0200 (Mon, 09 Oct 2017)
Log Message:
-----------
bxpapersize (8oct17)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/latex/bxpapersize/README.md
trunk/Master/texmf-dist/tex/latex/bxpapersize/bxpapersize.sty
Modified: trunk/Master/texmf-dist/doc/latex/bxpapersize/README.md
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxpapersize/README.md 2017-10-08 22:42:37 UTC (rev 45500)
+++ trunk/Master/texmf-dist/doc/latex/bxpapersize/README.md 2017-10-08 22:42:55 UTC (rev 45501)
@@ -133,6 +133,9 @@
Revision History
----------------
+ * Version 0.3b ‹2017/10/08›
+ - Support pTeX-ng (ApTeX) engine properly.
+ - (Experimental) Add `adjustmag` option.
* Version 0.3a ‹2017/05/02›
- Support format `size=<width>*<height>`
* Version 0.3 ‹2017/02/08›
Modified: trunk/Master/texmf-dist/tex/latex/bxpapersize/bxpapersize.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/bxpapersize/bxpapersize.sty 2017-10-08 22:42:37 UTC (rev 45500)
+++ trunk/Master/texmf-dist/tex/latex/bxpapersize/bxpapersize.sty 2017-10-08 22:42:55 UTC (rev 45501)
@@ -10,7 +10,7 @@
%% package declaration
\NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{bxpapersize}[2017/05/02 v0.3a]
+\ProvidesPackage{bxpapersize}[2017/10/08 v0.3b]
%% preparation
\def\bxpr at pkgname{bxpapersize}
@@ -62,6 +62,11 @@
%% unique tokens
\def\bxpr at end{\bxpr at end@}
+%% \bxpr at ptexng
+\chardef\bxpr at ptexng=0
+\edef\bxpr at tmpa{\string\ngbanner}\edef\bxpr at tmpb{\meaning\ngbanner}
+\ifx\bxpr at tmpa\bxpr at tmpb \chardef\bxpr at ptexng=1 \fi
+
%% \bxpr at pagewidth / \bxpr at pageheight
%% \bxpr at horigin / \bxpr at vorigin
\ifluatex % LuaTeX
@@ -84,7 +89,7 @@
\else\ifvtex % VTeX
\let\bxpr at pagewidth\mediawidth
\let\bxpr at pageheight\mediaheight
-\else\ifpdf % pdfTeX in PDF mode
+\else\ifnum0\the\bxpr at ptexng\ifpdf1\fi>0 % pdfTeX in PDF mode
\let\bxpr at pagewidth\pdfpagewidth
\let\bxpr at pageheight\pdfpageheight
\let\bxpr at horigin\pdfhorigin
@@ -165,6 +170,11 @@
\def\bxpr at set@priority#1{% invalidate
\bxpr at err@nlprm{priority}}}
+%% 'adjustmag'
+\define at boolkey+[bxpr]{prm}{adjustmag}[true]%
+ {}%
+ {\bxpr at err@ivval{adjustmag}{#1}}
+
%% 'truedimen'
\define at boolkey+[bxpr]{prm}{truedimen}[true]%
{\bxpr at needs@reset at sizetrue}%
@@ -389,7 +399,12 @@
\edef\bxpr at special@chunk{\special{papersize=\bxpr at tmpb}}}%
\else %pdf
\def\bxpr at set@page at size#1#2{%
- \bxpr at pagewidth=#1\relax \bxpr at pageheight=#2\relax
+ \let\bxpr at tmpb\@empty
+ \ifbxpr at prm@adjustmag
+ \bxpr at let@real at mag@to\bxpr at tmpb
+ \fi
+ \bxpr at pagewidth=#1\relax \bxpr at pagewidth=\bxpr at tmpb\bxpr at pagewidth
+ \bxpr at pageheight=#2\relax \bxpr at pageheight=\bxpr at tmpb\bxpr at pageheight
\bxDebug{papersize=\the\bxpr at pagewidth,\the\bxpr at pageheight}}%
\fi
More information about the tex-live-commits
mailing list