[popfile-commit] engine/tests TestMQ.tst,1.1,1.2

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

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

Modified Files:
	TestMQ.tst 
Log Message:
Change message names to make test a bit more careful

Index: TestMQ.tst
===================================================================
RCS file: /cvsroot/popfile/engine/tests/TestMQ.tst,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** TestMQ.tst	10 Jul 2003 04:28:16 -0000	1.1
--- TestMQ.tst	31 Jul 2003 14:22:04 -0000	1.2
***************
*** 42,45 ****
--- 42,46 ----
  # Register three different message types
  
+ $mq->register( 'MESG1', $r );
  $mq->register( 'MSG1', $r );
  $mq->register( 'MSG2', $r );
***************
*** 50,60 ****
  # First send a single message and check that it is
  # received
! $mq->post( 'MSG1', 'message1', 'param1' );
  $mq->service();
  my @messages = $r->read();
  test_assert_equal( $#messages, 0 );
! test_assert_equal( $messages[0][0], 'MSG1' );
! test_assert_equal( $messages[0][1], 'message1' );
! test_assert_equal( $messages[0][2], 'param1' );
  
  # Now send three messages and check that they are
--- 51,61 ----
  # First send a single message and check that it is
  # received
! $mq->post( 'MESG1', 'Message1', 'Param1' );
  $mq->service();
  my @messages = $r->read();
  test_assert_equal( $#messages, 0 );
! test_assert_equal( $messages[0][0], 'MESG1' );
! test_assert_equal( $messages[0][1], 'Message1' );
! test_assert_equal( $messages[0][2], 'Param1' );
  
  # Now send three messages and check that they are