summaryrefslogtreecommitdiff
path: root/FS/FS/cdr.pm
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2014-06-28 23:40:24 -0700
committerIvan Kohler <ivan@freeside.biz>2014-06-28 23:40:24 -0700
commite2d752f1e348d0903888aa85f46d6288e282d6c6 (patch)
treed5d0d4e7e7da70c57b6da58d470ed32cc7dd3d13 /FS/FS/cdr.pm
parent3ed189ae0f3d1a6fd082fe8d53d888dc4cd57ad2 (diff)
new zealand toll-free, RT#29638
Diffstat (limited to 'FS/FS/cdr.pm')
-rw-r--r--FS/FS/cdr.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/FS/FS/cdr.pm b/FS/FS/cdr.pm
index cced0eb..cd14165 100644
--- a/FS/FS/cdr.pm
+++ b/FS/FS/cdr.pm
@@ -370,6 +370,8 @@ sub is_tollfree {
my $field = scalar(@_) ? shift : 'dst';
my $country = $conf->config('tollfree-country');
if ( $country eq 'AU' ) {
+ ( $self->$field() =~ /^(\+?61)?1800/ ) ? 1 : 0;
+ } elsif ( $country eq 'NZ' ) {
( $self->$field() =~ /^(\+?64)?(800|508)/ ) ? 1 : 0;
} else { #NANPA (US/Canaada)
( $self->$field() =~ /^(\+?1)?8(8|([02-7])\3)/ ) ? 1 : 0;