Revision 1bd807c7
Von Tamino Steinert vor 5 Tagen hinzugefügt
| SL/DB/Part.pm | ||
|---|---|---|
| 607 | 607 |
my @selected_variant_property_ids = sort map {$_->variant_property_id} @$variant_property_values;
|
| 608 | 608 |
my @variant_property_ids = sort map {$_->id} @{$self->variant_properties};
|
| 609 | 609 |
if ("@variant_property_ids" ne "@selected_variant_property_ids") {
|
| 610 |
die "Given variant_property_values doesn't match the variant_properties of parent_variant part: " . $self->displayable_name; |
|
| 610 |
die t8("Given variant property values doesn't match the variant"
|
|
| 611 |
. " properties of parent variant '#1'." |
|
| 612 |
. " The parent vairant has the variant properties #2 and the" |
|
| 613 |
. " variant has the variant properties #3.", |
|
| 614 |
$self->displayable_name, |
|
| 615 |
join(', ', sort map {$_->displayable_name} @{$self->variant_properties}),
|
|
| 616 |
join(', ', sort map {$_->variant_property->displayable_name} @{$variant_property_values})
|
|
| 617 |
); |
|
| 611 | 618 |
} |
| 612 | 619 |
|
| 613 | 620 |
my $new_variant = $self->clone_and_reset; |
Auch abrufbar als: Unified diff
Varianten: S:D:Part: Fehler bei Varianten erstellen präzisiert