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