cvs commit: modperl-2.0/t/apache cookie.t

[stas]

stas        2003/09/11 19:17:12

  Modified:    t/apache cookie.t
  Log:
  must assert on getting the body, or the failure can be missed
  
  Revision  Changes    Path
  1.2       +2 -2      modperl-2.0/t/apache/cookie.t
  
  Index: cookie.t
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/apache/cookie.t,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -u -r1.1 -r1.2
  --- cookie.t  23 Aug 2003 02:39:10 -0000      1.1
  +++ cookie.t  12 Sep 2003 02:17:12 -0000      1.2
  @@ -3,7 +3,7 @@
   
   use Apache::Test;
   use Apache::TestUtil;
  -use Apache::TestRequest qw(GET_BODY);
  +use Apache::TestRequest qw(GET_BODY_ASSERT);
   
   plan tests => 2;
   
  @@ -19,7 +19,7 @@
   );
   
   for (qw/header env/) {
  -    my $received = GET_BODY "$location?$_", Cookie => $cookie;
  +    my $received = GET_BODY_ASSERT "$location?$_", Cookie => $cookie;
       ok t_cmp($expected{$_}, $received);
   }