perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@apache.org
Subject cvs commit: modperl/t/docs startup.pl
Date Tue, 19 Jun 2001 05:26:41 GMT
dougm       01/06/18 22:26:41

  Modified:    t/docs   startup.pl
  Log:
  DynaLoader needs to be required before XSLoader (pulled in by IO::File)
  
  Revision  Changes    Path
  1.41      +6 -6      modperl/t/docs/startup.pl
  
  Index: startup.pl
  ===================================================================
  RCS file: /home/cvs/modperl/t/docs/startup.pl,v
  retrieving revision 1.40
  retrieving revision 1.41
  diff -u -r1.40 -r1.41
  --- startup.pl	2000/12/23 00:32:21	1.40
  +++ startup.pl	2001/06/19 05:26:41	1.41
  @@ -28,17 +28,17 @@
       }; $@='' if $@;
   }
   
  -# BSD/OS 3.1 gets confused with some dynamically loaded code inside evals,
  -# so make sure IO::File is loaded here, rather than later within an eval.
  -# this should not harm any other platforms, since IO::File will be used
  -# by them anyhow.
  -use IO::File ();
  -
   use Apache ();
   use Apache::Registry ();
   unless ($INC{'Apache.pm'} =~ /blib/) {
       die "Wrong Apache.pm loaded: $INC{'Apache.pm'}";
   }
  +
  +# BSD/OS 3.1 gets confused with some dynamically loaded code inside evals,
  +# so make sure IO::File is loaded here, rather than later within an eval.
  +# this should not harm any other platforms, since IO::File will be used
  +# by them anyhow.
  +use IO::File ();
   
   Apache::Constants->export(qw(HTTP_MULTIPLE_CHOICES));
   
  
  
  

Mime
View raw message