Revision a040e91f
Von Moritz Bunkus vor etwa 14 Jahren hinzugefügt
| SL/DB/Order.pm | ||
|---|---|---|
|
return shift()->invoices(query => [ abschlag => 0 ]);
|
||
|
}
|
||
|
|
||
|
sub convert_to {
|
||
|
my ($self, %params) = @_;
|
||
|
|
||
|
my $destination_type = lc(delete $params{destination_type});
|
||
|
|
||
|
if ($destination_type eq 'invoice') {
|
||
|
$self->convert_to_invoice(%params);
|
||
|
} else {
|
||
|
croak("Unsupported destination type `$destination_type'");
|
||
|
}
|
||
|
}
|
||
|
|
||
|
sub convert_to_invoice {
|
||
|
my ($self, %params) = @_;
|
||
|
|
||
Auch abrufbar als: Unified diff
Überflüssige Funktion
Conflicts: