Author: torsten
Date: Tue Apr 13 11:36:14 2010
New Revision: 933563

URL: http://svn.apache.org/viewvc?rev=933563&view=rev
Log:
perl 5.12.0 warns about UNDEF in lc. Apache::Status uses "warnings FATAL => all"

Modified:
    perl/modperl/trunk/lib/Apache2/Status.pm

Modified: perl/modperl/trunk/lib/Apache2/Status.pm
URL: 
http://svn.apache.org/viewvc/perl/modperl/trunk/lib/Apache2/Status.pm?rev=933563&r1=933562&r2=933563&view=diff
==============================================================================
--- perl/modperl/trunk/lib/Apache2/Status.pm (original)
+++ perl/modperl/trunk/lib/Apache2/Status.pm Tue Apr 13 11:36:14 2010
@@ -95,8 +95,8 @@ sub install_hint {
 
 sub status_config {
     my ($r, $key) = @_;
-    return (lc($r->dir_config($key)) eq "on") ||
-        (lc($r->dir_config('StatusOptionsAll')) eq "on");
+    return (lc($r->dir_config($key) || '') eq "on") ||
+        (lc($r->dir_config('StatusOptionsAll') || '') eq "on");
 }
 
 sub menu_item {


Reply via email to