Revision 8e6d57a9
Von Tamino Steinert vor mehr als 1 Jahr hinzugefügt
| SL/DB/Order.pm | ||
|---|---|---|
|
sub _before_save_delete_from_purchase_basket {
|
||
|
my ($self) = @_;
|
||
|
|
||
|
my @basket_item_ids = grep { $_ ne ''} map { $_->{basket_item_id} } $self->orderitems;
|
||
|
my @basket_item_ids =
|
||
|
grep { defined($_) && $_ ne ''}
|
||
|
map { $_->{basket_item_id} }
|
||
|
$self->orderitems;
|
||
|
return 1 unless scalar @basket_item_ids;
|
||
|
|
||
|
# check if all items are still in the basket
|
||
Auch abrufbar als: Unified diff
DispositionManager: FIX: teste zuerst ob Wert definiert ist