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