[freeside-commits] freeside/FS/FS/part_pkg voip_cdr.pm,1.51,1.52

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/part_pkg
In directory wavetail.420.am:/tmp/cvs-serv10434

Modified Files:
	voip_cdr.pm 
Log Message:
by his noodly appendage, i hope this is just a precendece problem, RT#4502

Index: voip_cdr.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_pkg/voip_cdr.pm,v
retrieving revision 1.51
retrieving revision 1.52
diff -u -d -r1.51 -r1.52
--- voip_cdr.pm	13 Jan 2009 02:13:32 -0000	1.51
+++ voip_cdr.pm	13 Jan 2009 02:39:37 -0000	1.52
@@ -254,14 +254,14 @@
       my @call_details = ();
       if ( $rating_method eq 'prefix' ) {
 
-        my $da_rewrite = 0;
-        if ( scalar(@dirass) && $cdr->dst && grep $cdr->dst eq $_, @dirass ) {
+        my $da_rewrote = 0;
+        if ( scalar(@dirass) && $cdr->dst && grep { $cdr->dst eq $_ } @dirass ){
           $cdr->dst('411');
-          $da_rewrite = 1;
+          $da_rewrote = 1;
         }
 
         my $reason = $self->check_chargable( $cdr,
-                                             '411_rewrite'  => $da_rewrite,
+                                             'da_rewrote'   => $da_rewrote,
                                              'option_cache' => \%opt_cache,
                                            );
 
@@ -564,7 +564,7 @@
   return "carrierid != $opt{'use_carrierid'}"
     if $opt{'use_carrierid'}
     && $cdr->carrierid != $opt{'use_carrierid'}
-    && ! $flags{'411_rewrite'};
+    && ! $flags{'da_rewrote'};
 
   return "cdrtypenum != $opt{'use_cdrtypenum'}"
     if $opt{'use_cdrtypenum'}