new plain package fixpdfmag

git-svn-id: svn://tug.org/texlive/trunk@3669 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 36 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/plain/fixpdfmag/fixpdfmag.tex b/Master/texmf-dist/tex/plain/fixpdfmag/fixpdfmag.tex
new file mode 100644
index 00000000000..b19f3719657
--- /dev/null
+++ b/Master/texmf-dist/tex/plain/fixpdfmag/fixpdfmag.tex
@@ -0,0 +1,36 @@
+% fixpdfmag.tex
+% Author: Javier Bezos, 2007
+%
+% This is Public Domain. You are free to use, copy, modify, 
+% distribute or whatever you want without restrictions. It is
+% unsupported, so please, do not contact the author, just
+% modify the file.
+%
+% Unfortunately, pdftex  has changed recently its behaviour and
+% now the page size is affected by \magnification, usually not a
+% wanted effect. It has been proposed to modify Plain TeX when
+% used with pdftex, by making a few changes in the pdftex.ini
+% file, but many people do not know or simply do not want to
+% modify Plain TeX or a custom made format. This file provides
+% an alternative which requires to modify the documents, as
+% the following example illustrates:
+%
+% \magnification3000
+% \input fixpdfmag % <- after \magnification
+% 
+% Hello
+% \bye
+%
+% If you are using a custom page size, it is preserved,
+% as it just converts pt units to truept ones.
+
+\ifx\pdfpageheight\undefined\else
+  \begingroup
+  \catcode`\@=11
+  \global\pdfpageheight\expandafter\getf@ctor\the\pdfpageheight truept
+  \global\pdfpagewidth\expandafter\getf@ctor\the\pdfpagewidth truept
+  \global\pdfhorigin\expandafter\getf@ctor\the\pdfhorigin truept
+  \global\pdfvorigin\expandafter\getf@ctor\the\pdfvorigin truept
+  \endgroup
+\fi
+\endinput
\ No newline at end of file