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

[jwoolley]

jwoolley    2002/06/15 11:57:23

  Modified:    perl-framework/t/modules dir.t
  Log:
  I'm guessing these were supposed to be _different_ cases.  :)
  Make it a little tidier, too.  This gets the test passing again when
  mod_autoindex is enabled.
  
  Revision  Changes    Path
  1.5       +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.4
  retrieving revision 1.5
  diff -u -d -u -r1.4 -r1.5
  --- dir.t     15 Jun 2002 05:43:02 -0000      1.4
  +++ dir.t     15 Jun 2002 18:57:22 -0000      1.5
  @@ -24,7 +24,7 @@
   foreach my $bad_index (@bad_index) {
   
       print "expecting 403 (forbidden) using DirectoryIndex $bad_index\n";
  -    if (have_module 'autoindex'){ $expected = 404;} else {$expected = 404;}
  +    $expected = (have_module 'autoindex') ? 403 : 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";
  -if (have_module 'autoindex'){ $expected = 404;} else {$expected = 404;}
  +$expected = (have_module 'autoindex') ? 403 : 404;
   write_htaccess("@bad_index");
   $actual = GET_RC $url;
   ok ($actual == $expected);