stas 2003/12/19 11:29:23
Modified: ModPerl-Registry/t/cgi-bin require.pl
Log:
make sure that the local .pl file is loaded
(it's not longer removed from %INC by registrycooker, only perlrun does that on
behalf of the users)
Revision Changes Path
1.5 +1 -0 modperl-2.0/ModPerl-Registry/t/cgi-bin/require.pl
Index: require.pl
===================================================================
RCS file: /home/cvs/modperl-2.0/ModPerl-Registry/t/cgi-bin/require.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -u -r1.4 -r1.5
--- require.pl 6 Jan 2003 10:39:44 -0000 1.4
+++ require.pl 19 Dec 2003 19:29:23 -0000 1.5
@@ -9,6 +9,7 @@
print "Content-type: text/plain\n\n";
# XXX: meanwhile we don't chdir to the script's dir
+delete $INC{$require};
require $require;
print defined $test_require && $test_require;
