From: ivan <ivan>
Date: Fri, 12 Sep 2008 22:18:08 +0000 (+0000)
Subject: grr, TRY to support multiple internal_prefixen, RT#3985
X-Git-Tag: freeside_1_7_4rc1~185
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=17c79dc37ad3b498cf1dbbbae88e9dd5041705f9;p=freeside.git

grr, TRY to support multiple internal_prefixen, RT#3985
---

diff --git a/FS/FS/part_pkg/voip_cdr.pm b/FS/FS/part_pkg/voip_cdr.pm
index af09274d7..40998cf70 100644
--- a/FS/FS/part_pkg/voip_cdr.pm
+++ b/FS/FS/part_pkg/voip_cdr.pm
@@ -228,7 +228,7 @@ sub calc_recur {
 
           #determine the country code
           my $countrycode;
-          if ( grep { $number =~ /^$_(((\d)(\d))(\d))(\d+)$/ } @intl
+          if ( ( grep { $number =~ /^$_(((\d)(\d))(\d))(\d+)$/ } @intl )
                || $number =~ /^\+(((\d)(\d))(\d))(\d+)$/
              )
           {