From 3e8f47da1d2c80285ab08f04e982f4d22d646876 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, 13 Jul 2021 20:43:47 +0800
Subject: @_VARNAME_@ seems to generate error

---
 usertag/anteraja_rates.tag | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/usertag/anteraja_rates.tag b/usertag/anteraja_rates.tag
index e862790..40a8afd 100644
--- a/usertag/anteraja_rates.tag
+++ b/usertag/anteraja_rates.tag
@@ -2,8 +2,8 @@ UserTag anteraja_rates Order district city province weight
 UserTag anteraja_rates Routine <<EOR
 sub {
 	my ($district, $city, $province, $weight) = @_;
-	my @provisions = ( "@_ANTERAJA_BASE_PATH_@", "@_ANTERAJA_ACCESS_KEY_ID_@",
-		"@_ANTERAJA_SECRET_ACCESS_KEY_@" );
+	my @provisions = ( "@@ANTERAJA_BASE_PATH@@", "@@ANTERAJA_ACCESS_KEY_ID@@",
+		"@@ANTERAJA_SECRET_ACCESS_KEY@@" );
 	my $origin = $Tag->query({sql => "SELECT code FROM shipping WHERE district='". "__DISTRICT__"
 			. "' AND city='" . "__CITY__" . "' AND province='" . "__PROVINCE__" . "'",
 			wantarray=> 1})->[0]->[0];
-- 
cgit v1.2.3