[freeside-commits] branch master updated. fa572d76cce0784de0bc15939e6eaf8e06f3f8f6

[Mark Wells]

The branch, master has been updated
       via  fa572d76cce0784de0bc15939e6eaf8e06f3f8f6 (commit)
      from  5f26e344a894a65dfa7ccff7d3063e2f20eb0eff (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 fa572d76cce0784de0bc15939e6eaf8e06f3f8f6
Author: Mark Wells <mark at freeside.biz>
Date:   Mon May 16 15:02:06 2016 -0700

    allow "none" as international prefix when all calls have country codes, #41198

diff --git a/FS/FS/cdr.pm b/FS/FS/cdr.pm
index 8ccf7af..b3cceb4 100644
--- a/FS/FS/cdr.pm
+++ b/FS/FS/cdr.pm
@@ -546,6 +546,9 @@ sub parse_number {
 
   my $field = $options{column} || 'dst';
   my $intl = $options{international_prefix} || '011';
+  # Still, don't break anyone's CDR rating if they have an empty string in
+  # there. Require an explicit statement that there's no prefix.
+  $intl = '' if lc($intl) eq 'none';
   my $countrycode = '';
   my $number = $self->$field();
 
diff --git a/FS/FS/part_pkg/voip_cdr.pm b/FS/FS/part_pkg/voip_cdr.pm
index 7363700..be2d15b 100644
--- a/FS/FS/part_pkg/voip_cdr.pm
+++ b/FS/FS/part_pkg/voip_cdr.pm
@@ -149,7 +149,7 @@ tie my %accountcode_tollfree_field, 'Tie::IxHash',
 #                                    'type' => 'checkbox',
 #                                  },
 
-    'international_prefix' => { 'name'    => 'Destination prefix for international CDR records',
+    'international_prefix' => { 'name'    => 'Destination prefix for international CDR records (or "none" for no prefix)',
                                 'default' => '011',
                               },
 

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/cdr.pm               |    3 +++
 FS/FS/part_pkg/voip_cdr.pm |    2 +-
 2 files changed, 4 insertions(+), 1 deletion(-)