| Subject: | Bug report |
| Date: | Wed, 02 Aug 2006 14:43:21 +0300 |
| To: | bug-Apache-DBI [...] rt.cpan.org |
| From: | "Vladimir S. Tikhonjuk" <vst [...] vst.donetsk.ua> |
Distribution name and version: Apache-AuthDBI-1.01
Perl version: v5.8.8
Operating System vendor and version: Linux pluton 2.6.16-gentoo-r7 #4
Thu Jun 8 15:51:50 EEST 2006 i686 Intel(R) Pentium(R) 4 CPU 2.40GHz
GNU/Linux
AuthDBI.pm:
line 218: # here the dialog pops up and asks you for username and password
line 219: my ($res, $passwd_sent) = $r->get_basic_auth_pw;
line 220: debug (2, "$prefix get_basic_auth_pw: res = >$res<, password sent = >$passwd_sent<");
line 221: return $res if $res; # e.g. HTTP_UNAUTHORIZED
It's better to put debug (line 220) to 221 line and return (line 221) to 220 line, because then next message
prints to log every time before authorization:
Use of uninitialized value in concatenation (.) or string at /usr/lib/perl5/vendor_perl/5.8.8/Apache/AuthDBI.pm line 220.
32081 Apache::AuthDBI::authen get_basic_auth_pw: res = >401<, password sent = ><
Or set $passwd_sent var to '' if it's undef.