| Subject: | Patch to quieten warnings |
If things are not configured quite right then Apache2::AuthenDBMCache
can produce uninitialized value warnings. This patch fixes a couple.
| Subject: | perl-Apache2-AuthenDBMCache-0.01-warnings.diff |
diff -ru Apache2-AuthenDBMCache-0.01/AuthenDBMCache.pm Apache2-AuthenDBMCache-0.01-new/AuthenDBMCache.pm
--- Apache2-AuthenDBMCache-0.01/AuthenDBMCache.pm 2006-03-02 21:13:21.000000000 +0000
+++ Apache2-AuthenDBMCache-0.01-new/AuthenDBMCache.pm 2011-01-25 18:29:33.131129845 +0000
@@ -97,7 +97,13 @@
return $status unless ($status == Apache2::Const::OK); # e.g. HTTP_UNAUTHORIZED
# Get configuration... are we debugging?
- my $debug = (lc($r->dir_config('AuthenDBMCache_Debug')) eq 'on');
+ my $debug = 0;
+ {
+ my $d = $r->dir_config('AuthenDBMCache_Debug');
+ if (defined $d and lc($d) eq 'on') {
+ $debug = 1;
+ }
+ }
$cache=$tmp if ($tmp = $r->dir_config('AuthenDBMCache_file'));
# Get username and Realm
@@ -148,7 +154,13 @@
# Get configuration
my $ttl = $r->dir_config('AuthenDBMCache_TTL') || 3600;
- my $debug = (lc($r->dir_config('AuthenDBMCache_Debug')) eq 'on');
+ my $debug = 0;
+ {
+ my $d = $r->dir_config('AuthenDBMCache_Debug');
+ if (defined $d and lc($d) eq 'on') {
+ $debug = 1;
+ }
+ }
$cache=$tmp if ($tmp = $r->dir_config('AuthenDBMCache_file'));
# Get response and password