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;


Reply via email to