Stas Bekman wrote: > > Einar Roheim wrote: > > At 17:00 4/23/2002 +0800, you wrote: > > > >> Einar Roheim wrote: > >> > >>> Hi everyone, > >>> > >>> I have a problem installing mod_perl 1.26 with Apache 1.3.24. When I > >>> do the "make test" I'm getting this in the end before it aborts: > >> > >> > >> You have a mismatching version of LWP and URI packages, update both > >> and the problem should disappear. > > > > > > I did a "force install" on both of them (since I had the last version), > > but I still have the same problem. > > > > > > As Nicolai Schlenzig said, I can add "use URI::URL;" to these files: > > > > mod_perl-x.xx/t/internal/hooks.t > > mod_perl-x.xx/lib/Apache/test.pm > > mod_perl-x.xx/blib/Apache/test.pm > > > > But I still have the mismatch that you talked about. Don't I? > > > > How can this mismatch happen? > > Well I had this problem with lwp 5.64 and URI 1.09, after upgrading to > libwww-perl 5.64 and URI 1.1 the problem has disappeared.
Maybe with URI 1.1 but not with the current 1.11 > [...] > -- > Stas Bekman JAm_pH ------> Just Another mod_perl Hacker > http://stason.org/ mod_perl Guide ---> http://perl.apache.org > mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com > http://modperlbook.org http://apache.org http://ticketmaster.com The patch at the end solves the problems, the tests are running but you get error messages in one of the URI modules, that a undefined value is used. Regards, Silvio --- lib/Apache/test.pm~ Wed Feb 14 23:57:08 2001 +++ lib/Apache/test.pm Fri Feb 22 18:57:13 2002 @@ -5,6 +5,12 @@ use Exporter (); use Config; use FileHandle (); + +use URI::URL (); +sub URI::WithBase::can { + return UNIVERSAL::can(@_) || UNIVERSAL::can($_[0]->[0], $_[1]); +} + *import = \&Exporter::import; @EXPORT = qw(test fetch simple_fetch have_module skip_test --- t/internal/hooks.t~ Thu Jan 21 00:16:38 1999 +++ t/internal/hooks.t Fri Feb 22 18:46:53 2002 @@ -7,6 +7,7 @@ use ExtUtils::testlib; BEGIN { require "net/config.pl"; } require LWP::UserAgent; +require URI::URL; #first one queries httpd for enabled hooks, #generating a hook::handler() for each and writing t/docs/.htaccess @@ -29,7 +30,7 @@ foreach $loc (@urls) { $url = new URI::URL("http://$net::httpserver$loc";); - $request = new HTTP::Request('GET', $url); + $request = new HTTP::Request('GET', "$url"); print "GET $url\n\n";
