You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by kh...@hyperreal.org on 1998/10/01 21:31:22 UTC
cvs commit: modperl/t/docs startup.pl
khera 98/10/01 12:31:21
Modified: t/docs startup.pl
Log:
BSD/OS 3.1 DynaLoader gets confused with objects inside evals, it
seems. By explicitly loading IO::File from startup.pl, we are able to
actually get httpd to start, and subsequently pass all tests. Major
happiness ensues.
Submitted by: Vivek Khera
Revision Changes Path
1.24 +7 -0 modperl/t/docs/startup.pl
Index: startup.pl
===================================================================
RCS file: /home/cvs/modperl/t/docs/startup.pl,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -r1.23 -r1.24
--- startup.pl 1998/10/01 03:21:48 1.23
+++ startup.pl 1998/10/01 19:31:21 1.24
@@ -1,3 +1,4 @@
+#! /usr/local/bin/perl
BEGIN {
#./blib/lib:./blib/arch
use ExtUtils::testlib;
@@ -10,6 +11,12 @@
\$Apache::Server::ReStarting == \$Apache::ServerReStarting or
warn "GV alias broken\n";
}
+
+# 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 ();