summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--config/pikul_order.tag2
1 files changed, 1 insertions, 1 deletions
diff --git a/config/pikul_order.tag b/config/pikul_order.tag
index de4f7f2..0aad5c8 100644
--- a/config/pikul_order.tag
+++ b/config/pikul_order.tag
@@ -24,7 +24,7 @@ sub {
my @items = @{$Tag->query({sql => "SELECT sku,quantity FROM orderline WHERE \
order_number='$order_number'",
wantarray => 1
- })->[0]};
+ })};
for my $item (@items) {
($item->[2], $item->[3], $item->[4]) = @{$Tag->query({
sql => "SELECT description,price,weight FROM products WHERE sku='$item->[0]'",