X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcdr.pm;h=92586db679716d4e782efc5796cea04fcba2dc9a;hb=33668d4e9e8e538f75a4b6ef7958d27a98eb3a9d;hp=cb866ca583cc487740dc3b0f70b71d5c60353d82;hpb=721328592e2235848d2011ab74c754e27f908e87;p=freeside.git

diff --git a/FS/FS/cdr.pm b/FS/FS/cdr.pm
index cb866ca58..92586db67 100644
--- a/FS/FS/cdr.pm
+++ b/FS/FS/cdr.pm
@@ -1254,6 +1254,7 @@ sub clear_status {
   my $dbh = dbh;
 
   if ( $cdr_prerate && $cdr_prerate_cdrtypenums{$self->cdrtypenum}
+       && $self->rated_ratedetailnum #avoid putting old CDRs back in "rated"
        && $self->freesidestatus eq 'done'
      )
   { #special case