popfile-commit

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

Update of /cvsroot/popfile/engine/tests
In directory sc8-pr-cvs1:/tmp/cvs-serv28038/tests

Modified Files:
	TestBayes.tst 
Log Message:
Ensure that the output from history_read_class is consistent if the file CLS file does not exist or is empty; add appropriate test case

Index: TestBayes.tst
===================================================================
RCS file: /cvsroot/popfile/engine/tests/TestBayes.tst,v
retrieving revision 1.21
retrieving revision 1.22
diff -C2 -d -r1.21 -r1.22
*** TestBayes.tst	31 Jul 2003 16:32:22 -0000	1.21
--- TestBayes.tst	1 Aug 2003 00:59:56 -0000	1.22
***************
*** 564,568 ****
  my ( $reclassified, $bucket, $usedtobe, $magnet ) = $b->history_read_class( 'two.msg' );
  test_assert( !defined( $reclassified ) );
! test_assert( !defined( $bucket ) );
  test_assert( !defined( $usedtobe ) );
  test_assert( !defined( $magnet ) );
--- 564,575 ----
  my ( $reclassified, $bucket, $usedtobe, $magnet ) = $b->history_read_class( 'two.msg' );
  test_assert( !defined( $reclassified ) );
! test_assert_equal( $bucket, 'unknown class' );
! test_assert( !defined( $usedtobe ) );
! test_assert( !defined( $magnet ) );
! 
! `touch messages/two.cls`;
! my ( $reclassified, $bucket, $usedtobe, $magnet ) = $b->history_read_class( 'two.msg' );
! test_assert( !defined( $reclassified ) );
! test_assert_equal( $bucket, 'unknown class' );
  test_assert( !defined( $usedtobe ) );
  test_assert( !defined( $magnet ) );