Author: stevehay
Date: Tue Jun 24 07:29:59 2014
New Revision: 1605020
URL: http://svn.apache.org/r1605020
Log:
Fix reload.t as per r1565579. Reported in CPAN RT#96656.
Modified:
perl/Apache-Reload/trunk/t/lib/Apache2/TestReload.pm
Modified: perl/Apache-Reload/trunk/t/lib/Apache2/TestReload.pm
URL:
http://svn.apache.org/viewvc/perl/Apache-Reload/trunk/t/lib/Apache2/TestReload.pm?rev=1605020&r1=1605019&r2=1605020&view=diff
==============================================================================
--- perl/Apache-Reload/trunk/t/lib/Apache2/TestReload.pm (original)
+++ perl/Apache-Reload/trunk/t/lib/Apache2/TestReload.pm Tue Jun 24 07:29:59
2014
@@ -15,7 +15,7 @@ our $pass = 0;
sub handler {
my $r = shift;
$pass++;
- if ($r->args eq 'last') {
+ if (defined $r->args and $r->args eq 'last') {
Apache2::Reload->unregister_module($package);
ModPerl::Util::unload_package($package);
$pass = 0;