diff options
author | ꦌꦫꦶꦏ꧀ꦦꦿꦧꦮꦑꦩꦭ꧀ <erik@darapsa.co.id> | 2021-07-17 13:22:04 +0800 |
---|---|---|
committer | ꦌꦫꦶꦏ꧀ꦦꦿꦧꦮꦑꦩꦭ꧀ <erik@darapsa.co.id> | 2021-07-17 13:22:04 +0800 |
commit | bad203691742aecb781702ad1de4fc6e33fec356 (patch) | |
tree | a24af2023ac636270980aa7c9ece4fe904caac40 | |
parent | 8afdce3692396d8d18c5f40727fe2fc4da6b4792 (diff) |
Sometimes there's no array layer from query
-rw-r--r-- | config/pikul_order.tag | 2 |
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]'", |