Revision a386ea48
Von Bernd Bleßmann vor etwa 4 Jahren hinzugefügt
| SL/DN.pm | ||
|---|---|---|
|
$out = IO::File->new("| $form->{printer_command}");
|
||
|
}
|
||
|
|
||
|
$::locale->with_raw_io($out, sub { $out->print($_) while <$in> });
|
||
|
|
||
|
$form->error($main::locale->text('Could not spawn the printer command.')) unless $out;
|
||
|
|
||
|
$::locale->with_raw_io($out, sub { $out->print($_) while <$in> });
|
||
|
|
||
|
} else {
|
||
|
my $dunning_filename = $form->get_formname_translation('dunning');
|
||
|
print qq|Content-Type: Application/PDF\n| .
|
||
Auch abrufbar als: Unified diff
Mahnungen: PDF an Drucker schicken: Druckbefehl erst prüfen, dann verwenden