dougm 00/04/20 23:25:19
Modified: eg startup.pl
Log:
stas is slacking :)
Revision Changes Path
1.4 +1 -1 modperl/eg/startup.pl
Index: startup.pl
===================================================================
RCS file: /home/cvs/modperl/eg/startup.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- startup.pl 2000/04/19 12:46:39 1.3
+++ startup.pl 2000/04/21 06:25:19 1.4
@@ -13,7 +13,7 @@
#PerlRequire scripts/startup.pl
# make sure we are in a sane environment.
-$ENV{GATEWAY_INTERFACE} =~ /^CGI-Perl/ or die "GATEWAY_INTERFACE not Perl!";
+$ENV{MOD_PERL} or die "not running under mod_perl!";
#modify @INC if needed
#use lib qw(/foo/perl/lib);