From 33668d4e9e8e538f75a4b6ef7958d27a98eb3a9d Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 3 Jan 2012 04:50:10 +0000
Subject: [PATCH] avoid putting old CDRs back in a "rated" state, RT#15839

---
 FS/FS/cdr.pm | 1 +
 1 file changed, 1 insertion(+)

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
-- 
2.11.0