Diff of /spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm

Parent Directory | Revision Log | Patch

--- spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm	2005/10/17 21:35:18	325986
+++ spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm	2005/10/17 21:37:01	325987
@@ -1295,15 +1295,27 @@ sub finish_tests {
     if (defined &{'_head_tests_'.$clean_priority}) {
       undef &{'_head_tests_'.$clean_priority};
     }
+    foreach my $rulename (keys %{$conf->{head_tests}->{$priority}}) {
+      undef &{$rulename.'_head_test'};
+    }
     if (defined &{'_body_tests_'.$clean_priority}) {
       undef &{'_body_tests_'.$clean_priority};
     }
+    foreach my $rulename (keys %{$conf->{body_tests}->{$priority}}) {
+      undef &{$rulename.'_body_test'};
+    }
     if (defined &{'_body_uri_tests_'.$clean_priority}) {
       undef &{'_body_uri_tests_'.$clean_priority};
     }
+    foreach my $rulename (keys %{$conf->{uri_tests}->{$priority}}) {
+      undef &{$rulename.'_uri_test'};
+    }
     if (defined &{'_rawbody_tests_'.$clean_priority}) {
       undef &{'_rawbody_tests_'.$clean_priority};
     }
+    foreach my $rulename (keys %{$conf->{rawbody_tests}->{$priority}}) {
+      undef &{$rulename.'_rawbody_test'};
+    }
     if (defined &{'_full_tests_'.$clean_priority}) {
       undef &{'_full_tests_'.$clean_priority};
     }