Revision 26a6e8b0
Von Moritz Bunkus vor fast 17 Jahren hinzugefügt
| SL/ReportGenerator.pm | ||
|---|---|---|
| 631 | 631 |
my $requested_paper_size = lc shift; |
| 632 | 632 |
my $default_paper_size = shift; |
| 633 | 633 |
|
| 634 |
my %allowed_paper_sizes = map { $_ => 1 } qw(a3 a4 letter legal);
|
|
| 634 |
my %allowed_paper_sizes = map { $_ => 1 } qw(a3 a4 a5 letter legal);
|
|
| 635 | 635 |
|
| 636 | 636 |
return $allowed_paper_sizes{$requested_paper_size} ? $requested_paper_size : $default_paper_size;
|
| 637 | 637 |
} |
Auch abrufbar als: Unified diff
A5 sollte als Papiergröße ebenfalls funktionieren.