From c095b8fa445adceb58e5dd59c59cad17d23a9bc4 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, 14 Jul 2021 14:16:32 +0800
Subject: Origin setting so we can use catalog's

To be able to use @_VARNAME_@ or its variant syntaxes, it needs to be
done in usertag, as template tag cannot touch catalog settings.
---
 config/pikul_cost.tag | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'config')

diff --git a/config/pikul_cost.tag b/config/pikul_cost.tag
index 315b608..f078c5d 100644
--- a/config/pikul_cost.tag
+++ b/config/pikul_cost.tag
@@ -1,9 +1,8 @@
-UserTag pikul_cost Order company district city province weight service
+UserTag pikul_cost Order company origin district city province weight service
 UserTag pikul_cost Routine <<EOR
 sub {
-	my ($company, $district, $city, $province, $weight, $service) = @_;
+	my ($company, $origin, $district, $city, $province, $weight, $service) = @_;
 	my @provisions;
-	my $origin;
 	my $table;
 	if ($company == 0) {
 		@provisions = (
@@ -11,7 +10,6 @@ sub {
 			"$Global::Variable->{ANTERAJA_ACCESS_KEY_ID}",
 			"$Global::Variable->{ANTERAJA_SECRET_ACCESS_KEY}"
 		);
-		$origin = "$Global::Variable->{ANTERAJA_ORIGIN}";
 		$table = 'anteraja';
 	}
 	use Pikul;
-- 
cgit v1.2.3