Revision 232d7868
Von Bernd Bleßmann vor mehr als 9 Jahren hinzugefügt
| SL/Template/LaTeX.pm | ||
|---|---|---|
|
$ENV{openin_any} = "p";
|
||
|
|
||
|
for (my $run = 1; $run <= 2; $run++) {
|
||
|
system("${latex} --interaction=nonstopmode $form->{tmpfile} " .
|
||
|
"> $form->{tmpfile}.err");
|
||
|
if (system("${latex} --interaction=nonstopmode $form->{tmpfile} " .
|
||
|
"> $form->{tmpfile}.err") == -1) {
|
||
|
die "system call to $latex failed: $!";
|
||
|
}
|
||
|
if ($?) {
|
||
|
$ENV{HOME} = $old_home;
|
||
|
$ENV{openin_any} = $old_openin_any;
|
||
| ... | ... | |
|
|
||
|
$form->{tmpfile} =~ s/tex$/dvi/;
|
||
|
|
||
|
system("dvips $form->{tmpfile} -o -q > /dev/null");
|
||
|
if (system("dvips $form->{tmpfile} -o -q > /dev/null") == -1) {
|
||
|
die "system call to dvips failed: $!";
|
||
|
}
|
||
|
$ENV{HOME} = $old_home;
|
||
|
$ENV{openin_any} = $old_openin_any;
|
||
|
|
||
|
if ($?) {
|
||
|
$self->{"error"} = "dvips : $!";
|
||
|
$self->{"error"} = "dvips : $?";
|
||
|
$self->cleanup('dvips');
|
||
|
return 0;
|
||
|
}
|
||
| ... | ... | |
|
$ENV{openin_any} = "p";
|
||
|
|
||
|
for (my $run = 1; $run <= 2; $run++) {
|
||
|
system("${latex} --interaction=nonstopmode $form->{tmpfile} " .
|
||
|
"> $form->{tmpfile}.err");
|
||
|
if (system("${latex} --interaction=nonstopmode $form->{tmpfile} " .
|
||
|
"> $form->{tmpfile}.err") == -1) {
|
||
|
die "system call to $latex failed: $!";
|
||
|
}
|
||
|
|
||
|
if ($?) {
|
||
|
$ENV{HOME} = $old_home;
|
||
|
$ENV{openin_any} = $old_openin_any;
|
||
Auch abrufbar als: Unified diff
Rückgabewert von system-Aufrufen prüfen und ggf. Fehler ausgeben.