stas 2004/03/08 22:54:14
Modified: ModPerl-Registry/t/cgi-bin perlrun_extload.pl Log: argh! new file, no diff, cleanup the noise Revision Changes Path 1.2 +2 -8 modperl-2.0/ModPerl-Registry/t/cgi-bin/perlrun_extload.pl Index: perlrun_extload.pl =================================================================== RCS file: /home/cvs/modperl-2.0/ModPerl-Registry/t/cgi-bin/perlrun_extload.pl,v retrieving revision 1.1 retrieving revision 1.2 diff -u -u -r1.1 -r1.2 --- perlrun_extload.pl 9 Mar 2004 06:35:34 -0000 1.1 +++ perlrun_extload.pl 9 Mar 2004 06:54:14 -0000 1.2 @@ -1,19 +1,13 @@ use warnings; use strict; -# XXX: add the warning/error expected prints - use Apache::Test (); use Apache::TestUtil; use File::Spec::Functions qw(catfile catdir); -#my $dir;# = catdir Apache::Test::vars('serverroot'), 'cgi-bin'; -#BEGIN { $dir = catdir Apache::Test::vars('serverroot'), 'cgi-bin' } -#use lib $dir; -#my $require = catfile $dir, 'perlrun_nondecl.pl'; - use lib catdir Apache::Test::vars('serverroot'), 'cgi-bin'; -my $require = catfile Apache::Test::vars('serverroot'), 'cgi-bin', 'perlrun_nondecl.pl'; +my $require = catfile Apache::Test::vars('serverroot'), 'cgi-bin', + 'perlrun_nondecl.pl'; # require a module w/ package declaration (it doesn't get reloaded # because it declares the package). But we still have a problem with