[interchange] UserDB password debug logging of marginal usefulness.
Dan Browning <[email protected]>
| Newsgroups | gmane.comp.web.interchange.cvs |
|---|---|
| Message-ID | <[email protected]> |
commit 1026a682bceaf8812e24579372b6087e72865a35 Author: Daniel Browning <[email protected]> Date: Fri Apr 1 21:52:10 2011 -0700 UserDB password debug logging of marginal usefulness. lib/Vend/UserDB.pm | 4 ++++ 1 files changed, 4 insertions(+), 0 deletions(-) --- diff --git a/lib/Vend/UserDB.pm b/lib/Vend/UserDB.pm index 689148b..cb149e0 100644 --- a/lib/Vend/UserDB.pm +++ b/lib/Vend/UserDB.pm @@ -1517,6 +1517,10 @@ sub login { else { $db_pass = lc $db_pass if $self->{OPTIONS}{ignore_case}; } +#::logDebug(errmsg("crypt: %s", $self->{CRYPT})); +#::logDebug(errmsg("ignore_case: %s", $self->{OPTIONS}{ignore_case})); +#::logDebug(errmsg("given password: %s", $self->{PASSWORD})); +#::logDebug(errmsg("stored password: %s", $db_pass)); unless ($self->{PASSWORD} eq $db_pass) { $self->log_either(errmsg("Denied attempted login by user '%s' with incorrect password", $self->{USERNAME}));