summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorꦌꦫꦶꦏ꧀ꦦꦿꦧꦮꦑꦩꦭ꧀ <erik@darapsa.co.id>2021-07-13 20:39:47 +0800
committerꦌꦫꦶꦏ꧀ꦦꦿꦧꦮꦑꦩꦭ꧀ <erik@darapsa.co.id>2021-07-13 20:39:47 +0800
commita88e3cb6f9ca43822dea9ad36c286d132c04efb8 (patch)
tree798fc99a6afdb955fa86dc0817180727eebf2b1d
parent813fc5a6f334bc9e317f70f65811cc2450f8e207 (diff)
Rename to its original name
and give a chance for a seller to use their own provisions.
-rw-r--r--products/ship/shipping.asc2
-rw-r--r--usertag/anteraja_rates.tag (renamed from usertag/anteraja_cost.tag)10
2 files changed, 6 insertions, 6 deletions
diff --git a/products/ship/shipping.asc b/products/ship/shipping.asc
index 8011be1..ed5849a 100644
--- a/products/ship/shipping.asc
+++ b/products/ship/shipping.asc
@@ -2,4 +2,4 @@ anteraja: Anteraja
crit weight
min 1
max 50
- cost f [anteraja_cost district='[evalue address3]' city='[evalue city]' province='[evalue state]' weight=@@TOTAL@@]
+ cost f [anteraja_rates district='[evalue address3]' city='[evalue city]' province='[evalue state]' weight=@@TOTAL@@]
diff --git a/usertag/anteraja_cost.tag b/usertag/anteraja_rates.tag
index ac18a86..e862790 100644
--- a/usertag/anteraja_cost.tag
+++ b/usertag/anteraja_rates.tag
@@ -1,11 +1,11 @@
-UserTag anteraja_cost Order district city province weight
-UserTag anteraja_cost Routine <<EOR
+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__" . "'",
+ . "' AND city='" . "__CITY__" . "' AND province='" . "__PROVINCE__" . "'",
wantarray=> 1})->[0]->[0];
my $destination = $Tag->query({sql => "SELECT code FROM shipping WHERE district='" . $district
. "' AND city='" . $city . "' AND province='" . $province . "'",