From 0550cb43f08b97292639f800512df3965ee96df1 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: Tue, 20 Jul 2021 14:34:23 +0800
Subject: mv_shipmode seems to be always submitted

---
 config/pikul_codes.tag | 11 ++++-------
 1 file changed, 4 insertions(+), 7 deletions(-)

diff --git a/config/pikul_codes.tag b/config/pikul_codes.tag
index 4169c0b..fb4a0e6 100644
--- a/config/pikul_codes.tag
+++ b/config/pikul_codes.tag
@@ -24,15 +24,12 @@ sub {
 		$weight)};
 	Pikul::cleanup();
 	my $elements = '<select name="mv_shipmode" id="ship_widget" class="form-control" onchange="this.form.submit()">';
-	my $mv_shipmode = $Tag->value('mv_shipmode');
-	for my $i (0 .. $#codes) {
+	for my $code (@codes) {
 		$elements .= qq(
 												<option name="mv_shipmode" value="$table)
-			. qq(_$codes[$i]")
-			. ($mv_shipmode
-				? ($mv_shipmode eq $table . "_$codes[$i]" ? ' selected' : '')
-				: $i ? '' : ' selected')
-			. ">$table&nbsp;$codes[$i]</option>";
+			. qq(_$code")
+			. ($Tag->value('mv_shipmode') eq $table . "_$code" ? ' selected' : '')
+			. ">$table&nbsp;$code</option>";
 	}
 	$elements .= q(
 											</select>);
-- 
cgit v1.2.3