X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=FS%2FFS%2Fcdr.pm;h=cd1416533e509b2f8b56b898d6f4fc23b45afccc;hb=f5a3514aa0c5b197a7c520205f8103da1363572a;hp=cced0eb9053b1c306e01e9af4a437d7c21d3cd5a;hpb=9dc85ed9f36fbc48364305f9590ba7b3c230f20f;p=freeside.git diff --git a/FS/FS/cdr.pm b/FS/FS/cdr.pm index cced0eb90..cd1416533 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;