[freeside-commits] branch FREESIDE_3_BRANCH updated. 72ad2f16955e4593891bb851243f8a6de9c3fb80
Ivan
ivan at 420.am
Tue Aug 29 11:33:19 PDT 2017
The branch, FREESIDE_3_BRANCH has been updated
via 72ad2f16955e4593891bb851243f8a6de9c3fb80 (commit)
from d2bcbc27dcf98be7d183aa8e71b029a647e6200c (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit 72ad2f16955e4593891bb851243f8a6de9c3fb80
Author: Ivan Kohler <ivan at freeside.biz>
Date: Tue Aug 29 11:33:18 2017 -0700
quick script to add armed forces USPS "state" abbrivations, RT#77312
diff --git a/bin/add-usps-af b/bin/add-usps-af
new file mode 100755
index 0000000..5aec110
--- /dev/null
+++ b/bin/add-usps-af
@@ -0,0 +1,29 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+use FS::UID qw( adminsuidsetup );
+use FS::Setup;
+
+adminsuidsetup(shift) or die "usage: add-usps-af username\n";
+
+ my %addl = (
+ 'US' => {
+# 'FM' => 'Federated States of Micronesia',
+# 'MH' => 'Marshall Islands',
+# 'PW' => 'Palau',
+ 'AA' => "Armed Forces Americas (except Canada)",
+ 'AE' => "Armed Forces Europe / Canada / Middle East / Africa",
+ 'AP' => "Armed Forces Pacific",
+ },
+ );
+
+ foreach my $country ( keys %addl ) {
+ foreach my $state ( keys %{ $addl{$country} } ) {
+ # $longname = $addl{$country}{$state};
+ FS::Setup::_add_locale( 'country'=>$country, 'state'=>$state);
+ }
+ }
+
+1;
+
-----------------------------------------------------------------------
Summary of changes:
bin/add-usps-af | 29 +++++++++++++++++++++++++++++
1 file changed, 29 insertions(+)
create mode 100755 bin/add-usps-af
More information about the freeside-commits
mailing list