summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLPaper.pm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2016-04-16 04:37:26 +0000
committerNorbert Preining <preining@logic.at>2016-04-16 04:37:26 +0000
commit24fa12271f439d371f75c549073443dfe421c45d (patch)
tree068ef5b348dcbefdfa82faaf5eb731c79673a9bd /Master/tlpkg/TeXLive/TLPaper.pm
parent4560a98ba073c1d0143d5f3b56803be9f526a616 (diff)
fix TLPaper wrong replacement strings for pdftex
git-svn-id: svn://tug.org/texlive/trunk@40548 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPaper.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLPaper.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLPaper.pm b/Master/tlpkg/TeXLive/TLPaper.pm
index b721566ff2f..e4e92e74cfd 100644
--- a/Master/tlpkg/TeXLive/TLPaper.pm
+++ b/Master/tlpkg/TeXLive/TLPaper.pm
@@ -393,7 +393,7 @@ sub paper_pdftex {
for my $idx (@cpwidx) {
ddebug("TLPaper: before line: $lines[$idx]");
ddebug("TLPaper: replacement: $newwidth\n");
- $lines[$idx] =~ s/^\s*\\pdfpagewidth\s*=\s*[0-9.,]+\s*true\s*[^\s]*/pagewidth = $newwidth/;
+ $lines[$idx] =~ s/^\s*\\pdfpagewidth\s*=\s*[0-9.,]+\s*true\s*[^\s]*/\\pdfpagewidth = $newwidth/;
ddebug("TLPaper: after line : $lines[$idx]");
}
} else {
@@ -408,7 +408,7 @@ sub paper_pdftex {
for my $idx (@cphidx) {
ddebug("TLPaper: before line: $lines[$idx]");
ddebug("TLPaper: replacement: $newheight\n");
- $lines[$idx] =~ s/^\s*\\pdfpageheight\s*=\s*[0-9.,]+\s*true\s*[^\s]*/pageheight = $newheight/;
+ $lines[$idx] =~ s/^\s*\\pdfpageheight\s*=\s*[0-9.,]+\s*true\s*[^\s]*/\\pdfpageheight = $newheight/;
ddebug("TLPaper: after line : $lines[$idx]");
}
} else {