Update of /cvsroot/popfile/engine
In directory sc8-pr-cvs1:/tmp/cvs-serv12198
Modified Files:
traintest.pl
Log Message:
update to allow training on fewer groupings
Index: traintest.pl
===================================================================
RCS file: /cvsroot/popfile/engine/traintest.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** traintest.pl 12 Apr 2003 07:20:50 -0000 1.4
--- traintest.pl 29 May 2003 05:49:42 -0000 1.5
***************
*** 358,361 ****
--- 358,363 ----
$bucket_class = $b->classify_file( $self->{messages}->{messages}{ @sorted_messages[$index] }{long});
$bucket_true = $self->{messages}->{messages}{ @sorted_messages[$index] }{bucket};
+
+ $b->{parser__}->{subject__} =~ s/(\r\n|\n|\r)[ \t]+//gm;
if ($bucket_class ne $bucket_true) {
|
