[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