[popfile-commit] engine/Classifier Bayes.pm,1.151,1.152

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

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

Modified Files:
	Bayes.pm 
Log Message:
When creating blank buckets at least include the bucket header

Index: Bayes.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Classifier/Bayes.pm,v
retrieving revision 1.151
retrieving revision 1.152
diff -C2 -d -r1.151 -r1.152
*** Bayes.pm	19 Jun 2003 13:58:30 -0000	1.151
--- Bayes.pm	23 Jun 2003 22:35:35 -0000	1.152
***************
*** 1292,1296 ****
  
      if ( open NEW, '>' . $self->config_( 'corpus' ) . "/$bucket/table" ) {
!         print NEW "\n";
          close NEW;
      }
--- 1292,1296 ----
  
      if ( open NEW, '>' . $self->config_( 'corpus' ) . "/$bucket/table" ) {
!         print NEW "__CORPUS__ __VERSION__ 1\n";
          close NEW;
      }