[popfile-commit] engine/Classifier Bayes.pm,1.157,1.158

[<ssc...@us...>]

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

Modified Files:
	Bayes.pm 
Log Message:
fix case where it was possible for messages to terminate without CRLF.CRLF (my fault)
ensure classify_and_modify streams are always binmode

Index: Bayes.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Classifier/Bayes.pm,v
retrieving revision 1.157
retrieving revision 1.158
diff -C2 -d -r1.157 -r1.158
*** Bayes.pm	30 Jun 2003 14:57:52 -0000	1.157
--- Bayes.pm	2 Jul 2003 09:50:14 -0000	1.158
***************
*** 950,953 ****
--- 950,958 ----
      $echo = 1 unless (defined $echo);
  
+     # binmode both our streams incase they're file streams or something odd
+ 
+     binmode $mail;
+     binmode $client;
+ 
      my $msg_subject     = '';     # The message subject
      my $msg_head_before = '';     # Store the message headers that come before Subject here
***************
*** 1164,1168 ****
          }
  
!         print $client ".$eol" if ( $echo );
      }
  
--- 1169,1173 ----
          }
  
!         print $client "$eol.$eol" if ( $echo );
      }