From c302b25c7512159cd65ea27d53460d02fa14d75c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=EA=A6=8C=EA=A6=AB=EA=A6=B6=EA=A6=8F=EA=A7=80=EA=A6=A6?=
 =?UTF-8?q?=EA=A6=BF=EA=A6=A7=EA=A6=AE=EA=A6=91=EA=A6=A9=EA=A6=AD=EA=A7=80?=
 <erik@darapsa.co.id>
Date: Wed, 7 Jul 2021 23:21:23 +0800
Subject: Fix form input names

---
 include/checkout/shipping_address | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'include')

diff --git a/include/checkout/shipping_address b/include/checkout/shipping_address
index 4393cc7..5b2b24e 100644
--- a/include/checkout/shipping_address
+++ b/include/checkout/shipping_address
@@ -46,9 +46,9 @@ return $options;
 											<select name="address3" id="district_shipping" class="form-control" onchange="this.form.submit()">
 												<option value="-- [L]Please select[/L] --">-- [L]Please select[/L] --</option>[perl products]
 my $options = '';
-for my $district (@{$Tag->query({sql => "SELECT district FROM shipping WHERE city='" . $Tag->value({keep => 1, filter => encode_entities, name => 'address3'}) . "' GROUP BY district ORDER BY district"})}) {
+for my $district (@{$Tag->query({sql => "SELECT district FROM shipping WHERE city='" . $Tag->value({keep => 1, filter => encode_entities, name => 'city'}) . "' GROUP BY district ORDER BY district"})}) {
 				$options .= qq(
-												<option value="$district->[0]") . ($district->[0] eq $Tag->value({keep => 1, filter => encode_entities, name => 'district'}) ? ' selected' : '') . ">$district->[0]</option>";
+												<option value="$district->[0]") . ($district->[0] eq $Tag->value({keep => 1, filter => encode_entities, name => 'address3'}) ? ' selected' : '') . ">$district->[0]</option>";
 }
 return $options;
 [/perl]
-- 
cgit v1.2.3