stas 2004/09/27 20:42:39
Modified: lib/Apache Status.pm . Changes Log: resolve several 'Use of uninitialized value in...' warnings in Apache::Status Revision Changes Path 1.29 +3 -2 modperl-2.0/lib/Apache/Status.pm Index: Status.pm =================================================================== RCS file: /home/cvs/modperl-2.0/lib/Apache/Status.pm,v retrieving revision 1.28 retrieving revision 1.29 diff -u -u -r1.28 -r1.29 --- Status.pm 23 Aug 2004 21:16:27 -0000 1.28 +++ Status.pm 28 Sep 2004 03:42:39 -0000 1.29 @@ -99,7 +99,7 @@ # if !$opt we skip the testing for the option return 0 if $opt && !status_config($r, $opt); return 0 unless eval { require $file }; - return 0 unless $module->VERSION >= $version; + return 0 unless $module->VERSION && $module->VERSION >= $version; return 1; } @@ -362,7 +362,8 @@ qq{<b>Under the "perl-script" handler, the environment is</b>:}; } push @retval, "\n</p>\n"; - push @retval, "<pre>", (map "$_ = $ENV{$_}\n", sort keys %ENV), "</pre>"; + push @retval, "<pre>", + (map "$_ = " . ($ENV{$_}||'') . "\n", sort keys %ENV), "</pre>"; [EMAIL PROTECTED]; } 1.502 +3 -0 modperl-2.0/Changes Index: Changes =================================================================== RCS file: /home/cvs/modperl-2.0/Changes,v retrieving revision 1.501 retrieving revision 1.502 diff -u -u -r1.501 -r1.502 --- Changes 26 Sep 2004 07:06:23 -0000 1.501 +++ Changes 28 Sep 2004 03:42:39 -0000 1.502 @@ -12,6 +12,9 @@ =item 1.99_17-dev +resolve several 'Use of uninitialized value in...' warnings in +Apache::Status [Stas]. + make install and static build now correctly installs mod_perl as well as the statically built apache [Gozer]