perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From ge...@apache.org
Subject cvs commit: modperl-2.0/t/response/TestAPR finfo.pm
Date Mon, 03 May 2004 12:54:08 GMT
geoff       2004/05/03 05:54:08

  Modified:    t/response/TestAPR finfo.pm
  Log:
  finfo.fname works on win32 as of 2.0.49
  
  Revision  Changes    Path
  1.10      +5 -3      modperl-2.0/t/response/TestAPR/finfo.pm
  
  Index: finfo.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/response/TestAPR/finfo.pm,v
  retrieving revision 1.9
  retrieving revision 1.10
  diff -u -r1.9 -r1.10
  --- finfo.pm	15 Apr 2004 13:00:24 -0000	1.9
  +++ finfo.pm	3 May 2004 12:54:08 -0000	1.10
  @@ -10,6 +10,8 @@
   use constant WIN32 => Apache::TestConfig::WIN32;
   use constant OSX   => Apache::TestConfig::OSX;
   
  +use constant APACHE_2_0_49 => have_apache_version('2.0.49');
  +
   use Apache::RequestRec ();
   use APR::Finfo ();
   use APR::Const -compile => qw(SUCCESS FINFO_NORM REG
  @@ -107,9 +109,9 @@
   
       # tests for stuff not in perl's stat
       {
  -        # XXX r->finfo->fname requires on Win32 a patched cvs apr
  -        if (WIN32) {
  -            skip "finfo.fname not available yet on Win32", 0;
  +        # BACK_COMPAT_MARKER - fixed as of 2.0.49.
  +        if (WIN32 && !APACHE_2_0_49) {
  +            skip "finfo.fname requires Apache 2.0.49 or later", 0;
           }
           else {
               ok t_cmp($file,
  
  
  

Mime
View raw message