
interchange-cvs at icdevgroup
Apr 1, 2011, 11:39 PM
Post #1 of 1
(294 views)
Permalink
|
|
[interchange] UserDB password debug logging of marginal usefulness.
|
|
commit 1026a682bceaf8812e24579372b6087e72865a35 Author: Daniel Browning <db [at] kavod> 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})); _______________________________________________ interchange-cvs mailing list interchange-cvs [at] icdevgroup http://www.icdevgroup.org/mailman/listinfo/interchange-cvs
|