Lines 537-542
sub import_biblios_list {
Link Here
|
537 |
$iteminfos->{budget_id} = $item_budget->{budget_id} || $budget_id; |
537 |
$iteminfos->{budget_id} = $item_budget->{budget_id} || $budget_id; |
538 |
} |
538 |
} |
539 |
|
539 |
|
|
|
540 |
$iteminfos->{price} ||= $price; # Fallback to order price if no item price was defined |
541 |
|
540 |
# Clone the item data for the needed quantity |
542 |
# Clone the item data for the needed quantity |
541 |
# Add the incremented item id for each item in that quantity |
543 |
# Add the incremented item id for each item in that quantity |
542 |
for (my $i = 0; $i < $quantity; $i++) { |
544 |
for (my $i = 0; $i < $quantity; $i++) { |
543 |
- |
|
|