diff options
| author | Marius <mariausol@gmail.com> | 2011-01-31 00:18:53 +0200 |
|---|---|---|
| committer | Marius <mariausol@gmail.com> | 2011-01-31 00:18:53 +0200 |
| commit | 3019c4ccfb0d984b45670a86d2400a6aacfbaa68 (patch) | |
| tree | 92edfef9689a49ee95bc35cbe875a5e0ed0c7121 /scripts/context/perl | |
| parent | fcf2bf760b1f48c1ba2f5d0a3eed5dacb2751e95 (diff) | |
| download | context-3019c4ccfb0d984b45670a86d2400a6aacfbaa68.tar.gz | |
beta 2011.01.18 19:34
Diffstat (limited to 'scripts/context/perl')
| -rw-r--r-- | scripts/context/perl/mptopdf.pl | 19 |
1 files changed, 12 insertions, 7 deletions
diff --git a/scripts/context/perl/mptopdf.pl b/scripts/context/perl/mptopdf.pl index ec08c5306..374d8912a 100644 --- a/scripts/context/perl/mptopdf.pl +++ b/scripts/context/perl/mptopdf.pl @@ -38,14 +38,16 @@ my $PassOn = '' ; "rawmp" => \$RawMP, # option is now default, but keep for compat "metafun" => \$MetaFun, "passon" => \$PassOn, # option is ignored, but keep for compat - "latex" => \$Latex ) ; - -my $program = "MPtoPDF 1.4.0" ; -my $pattern = "@ARGV" ; # was $ARGV[0] -my $miktex = 0 ; -my $done = 0 ; -my $report = '' ; + "latex" => \$Latex, + "texexec" => \$TeXexec) ; + +my $program = "MPtoPDF 1.4.1" ; +my $pattern = "@ARGV" ; # was $ARGV[0] +my $miktex = 0 ; +my $done = 0 ; +my $report = '' ; my $mplatexswitch = " --tex=latex " ; +my $texexecswitch = " --tex=\"texexec --batch --once --nomp --mptex\" " # untested my $dosish = ($Config{'osname'} =~/^(ms)?dos|^os\/2|^mswin/i) ; my $escapeshell = (($ENV{'SHELL'}) && ($ENV{'SHELL'} =~ m/sh/i )); @@ -88,6 +90,9 @@ if (($pattern eq '')||($Help)) { if ($Latex) { $rest .= " $mplatexswitch" ; } + if ($TeXexec) { + $rest .= " $texexecswitch" ; + } if ($MetaFun) { $mpbin = "mpost --progname=mpost --mem=metafun" ; } else { |