diff options
| author | Marius <mariausol@gmail.com> | 2011-02-25 23:40:24 +0200 |
|---|---|---|
| committer | Marius <mariausol@gmail.com> | 2011-02-25 23:40:24 +0200 |
| commit | 2a9554684f61df8db63dec6d4e874f49b25a212b (patch) | |
| tree | fcfd079187ab1f1969351bcafffdfed837b43b33 /scripts/context/perl | |
| parent | 3880c6aa8cef3b379b06777c09f9ce3e7e61f493 (diff) | |
| download | context-2a9554684f61df8db63dec6d4e874f49b25a212b.tar.gz | |
beta 2011.02.25 22:03
Diffstat (limited to 'scripts/context/perl')
| -rw-r--r-- | scripts/context/perl/mptopdf.pl | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/scripts/context/perl/mptopdf.pl b/scripts/context/perl/mptopdf.pl index 374d8912a..42db9001e 100644 --- a/scripts/context/perl/mptopdf.pl +++ b/scripts/context/perl/mptopdf.pl @@ -27,11 +27,12 @@ use File::Basename ; $Getopt::Long::passthrough = 1 ; # no error message $Getopt::Long::autoabbrev = 1 ; # partial switch accepted -my $Help = 0; -my $Latex = 0; -my $RawMP = 1; +my $Help = 0 ; +my $Latex = 0 ; +my $TeXexec = 0 ; +my $RawMP = 1 ; my $MetaFun = 0 ; -my $PassOn = '' ; +my $PassOn = '' ; &GetOptions ( "help" => \$Help , @@ -47,9 +48,9 @@ my $miktex = 0 ; my $done = 0 ; my $report = '' ; my $mplatexswitch = " --tex=latex " ; -my $texexecswitch = " --tex=\"texexec --batch --once --nomp --mptex\" " # untested +my $texexecswitch = " --tex=\"texexec --batch --once --nomp --mptex\" " ; # untested -my $dosish = ($Config{'osname'} =~/^(ms)?dos|^os\/2|^mswin/i) ; +my $dosish = ($Config{'osname'} =~ /^(ms)?dos|^os\/2|^mswin/i) ; my $escapeshell = (($ENV{'SHELL'}) && ($ENV{'SHELL'} =~ m/sh/i )); if ($ENV{"TEXSYSTEM"}) { |