[popfile-commit] engine/Classifier Bayes.pm,1.176,1.177

[<jgr...@us...>]

Update of /cvsroot/popfile/engine/Classifier
In directory sc8-pr-cvs1:/tmp/cvs-serv16357/Classifier

Modified Files:
	Bayes.pm 
Log Message:
Finished test suite for Bayes except for the generation of HTML for the UI which I'll leave until I do the test suite for UI::HTML; have 88% coverage of Classifier::Bayes

Index: Bayes.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Classifier/Bayes.pm,v
retrieving revision 1.176
retrieving revision 1.177
diff -C2 -d -r1.176 -r1.177
*** Bayes.pm	27 Jul 2003 20:00:30 -0000	1.176
--- Bayes.pm	27 Jul 2003 21:13:40 -0000	1.177
***************
*** 1177,1182 ****
                  if ( $self->global_config_( 'subject' ) ) {
                      # Don't add the classification unless it is not present
!                     if ( !( $msg_subject =~ /\[\Q$classification\E\]/ ) &&
!                          ( $self->{parameters__}{$classification}{subject} == 1 ) ) {
                          $msg_subject = " $modification$msg_subject";
                      }
--- 1177,1182 ----
                  if ( $self->global_config_( 'subject' ) ) {
                      # Don't add the classification unless it is not present
!                     if ( !( $msg_subject =~ /\[\Q$classification\E\]/ ) &&             # PROFILE BLOCK START
!                          ( $self->{parameters__}{$classification}{subject} == 1 ) ) {  # PROFILE BLOCK STOP
                          $msg_subject = " $modification$msg_subject";
                      }