cvs commit: httpd-test/perl-framework/t/modules dir.t

[rbb]

rbb         2002/06/14 22:43:02

  Modified:    perl-framework/t/modules dir.t
  Log:
  If autoindex isn't loaded, the return code will be a 404.  If it is the
  return code will be 403.  This makes the test respect that difference.
  
  Revision  Changes    Path
  1.4       +2 -2      httpd-test/perl-framework/t/modules/dir.t
  
  Index: dir.t
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/t/modules/dir.t,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -u -r1.3 -r1.4
  --- dir.t     20 Oct 2001 02:25:25 -0000      1.3
  +++ dir.t     15 Jun 2002 05:43:02 -0000      1.4
  @@ -24,7 +24,7 @@
   foreach my $bad_index (@bad_index) {
   
       print "expecting 403 (forbidden) using DirectoryIndex $bad_index\n";
  -    $expected = 403;
  +    if (have_module 'autoindex'){ $expected = 404;} else {$expected = 404;}
       write_htaccess("$bad_index");
       $actual = GET_RC $url;
       ok ($actual == $expected);
  @@ -66,7 +66,7 @@
   ok ($actual eq $expected);
   
   print "expecting 403 for DirectoryIndex @bad_index\n";
  -$expected = 403;
  +if (have_module 'autoindex'){ $expected = 404;} else {$expected = 404;}
   write_htaccess("@bad_index");
   $actual = GET_RC $url;
   ok ($actual == $expected);