summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2007-05-20 20:54:44 +0000
committerKarl Berry <karl@freefriends.org>2007-05-20 20:54:44 +0000
commit7ced72e836be0e1f7b0db873796a04941749bf10 (patch)
tree76a32bd3bc881eb3f2eb7474d47defb043e592ef
parent564ffc040cca987681b593c276fd52588a59dcf7 (diff)
try new mptopdf
git-svn-id: svn://tug.org/texlive/trunk@4327 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Master/texmf-dist/scripts/context/perl/mptopdf.pl14
1 files changed, 8 insertions, 6 deletions
diff --git a/Master/texmf-dist/scripts/context/perl/mptopdf.pl b/Master/texmf-dist/scripts/context/perl/mptopdf.pl
index b1589a9d39e..a6b946baa4d 100644
--- a/Master/texmf-dist/scripts/context/perl/mptopdf.pl
+++ b/Master/texmf-dist/scripts/context/perl/mptopdf.pl
@@ -37,12 +37,11 @@ my $PassOn = '' ;
"passon" => \$PassOn,
"latex" => \$Latex ) ;
-my $program = "MPtoPDF 1.3.2" ;
+my $program = "MPtoPDF 1.3.3" ;
my $pattern = "@ARGV" ; # was $ARGV[0]
my $miktex = 0 ;
my $done = 0 ;
my $report = '' ;
-my $texlatexswitch = " --tex=latex --format=latex " ;
my $mplatexswitch = " --tex=latex " ;
my $dosish = ($Config{'osname'} =~/^(ms)?dos|^os\/2|^mswin/i) ;
@@ -94,12 +93,15 @@ if (($pattern eq '')||($Help)) {
}
} else {
if ($Latex) {
- $rest .= " $texlatexswitch" ;
+ $rest .= " $mplatexswitch" ;
+ $mpbin = "mpost --mem=mpost" ;
+ } else {
+ $mpbin = "texexec --mptex $PassOn " ;
}
- $mpbin = "texexec --mptex $PassOn" ;
}
- print "\n$program : running '$mpbin'\n" ;
- my $error = system ("$mpbin $rest $pattern") ;
+ my $runner = "$mpbin $rest $pattern" ;
+ print "\n$program : running '$runner'\n" ;
+ my $error = system ($runner) ;
if ($error) {
print "\n$program : error while processing mp file\n" ;
exit ;