Re: bug in test lib in mod_perl 2.0.8 / apache 2.2.27 - w/ patch
Steve Hay <[email protected]>
| Newsgroups | gmane.comp.apache.mod-perl |
|---|---|
| Message-ID | <CADED=K5mVw7TnCe8HDQ5CEEL9U=wMYSZ+e-Ljo2oAVSOr8Z7Fg@mail.gmail.com> |
On 23 June 2014 07:16, Mark Hedges <[email protected]> wrote: > [email protected] /ntfhome/local/src/perl/mod_perl-2.0.8 > 2014-06-22 23:09:00 Sun $ diff -u /ntfhome/local/src/perl/mod_perl-2.0.8/t/response/TestDirective/perlloadmodule2.pm.orig /ntfhome/local/src/perl/mod_perl-2.0.8/t/response/TestDirective/perlloadmodule2.pm > --- /ntfhome/local/src/perl/mod_perl-2.0.8/t/response/TestDirective/perlloadmodule2.pm.orig 2014-06-22 23:07:40.833878000 -0700 > +++ /ntfhome/local/src/perl/mod_perl-2.0.8/t/response/TestDirective/perlloadmodule2.pm 2014-06-22 23:08:16.291719000 -0700 > @@ -82,7 +82,8 @@ > > my $s = $r->server; > > - if ($r->args eq 'srv') { > + my $args = $r->args; > + if (defined $args && $args eq 'srv') { > my $srv_cfg = $self->get_config($s); > $r->print("srv: @{ $srv_cfg->{MyMergeTest}||[] }"); > } Thanks for the patch. However, this is already fixed in trunk in the SVN repository.