randyk      2004/07/09 08:36:13

  Modified:    t/error  runtime.t syntax.t
  Log:
  swap args to t_cmp in t/error tests to use new
  ($received, $expected, $comment) syntax.
  
  Revision  Changes    Path
  1.4       +2 -2      modperl-2.0/t/error/runtime.t
  
  Index: runtime.t
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/error/runtime.t,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -u -r1.3 -r1.4
  --- runtime.t 4 May 2004 06:19:59 -0000       1.3
  +++ runtime.t 9 Jul 2004 15:36:13 -0000       1.4
  @@ -19,8 +19,8 @@
       my $res = GET("$location?$type");
       #t_debug($res->content);
       ok t_cmp(
  -        500,
           $res->code,
  +        500,
           "500 error on $type exception",
      );
   }
  @@ -28,8 +28,8 @@
   for my $type (@trapped) {
       my $body = GET_BODY("$location?$type");
       ok t_cmp(
  -        "ok $type",
           $body,
  +        "ok $type",
           "200 on $type exception",
      );
   }
  
  
  
  1.3       +1 -1      modperl-2.0/t/error/syntax.t
  
  Index: syntax.t
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/error/syntax.t,v
  retrieving revision 1.2
  retrieving revision 1.3
  diff -u -r1.2 -r1.3
  --- syntax.t  18 Apr 2003 06:18:56 -0000      1.2
  +++ syntax.t  9 Jul 2004 15:36:13 -0000       1.3
  @@ -11,7 +11,7 @@
   my $res = GET($location);
   #t_debug($res->content);
   ok t_cmp(
  -    500,
       $res->code,
  +    500,
       "500 error on syntax error",
      );
  
  
  

Reply via email to