r10518@t0mlaptop (orig r10517): t0m | 2009-06-12 11:27:58 +0100

[catagits/Catalyst-Plugin-Authentication.git] / lib / Catalyst / Authentication / Credential / Password.pm

diff --git a/lib/Catalyst/Authentication/Credential/Password.pm b/lib/Catalyst/Authentication/Credential/Password.pm
index 3545849..8010fe3 100644 (file)
--- a/lib/Catalyst/Authentication/Credential/Password.pm
+++ b/lib/Catalyst/Authentication/Credential/Password.pm
@@ -10,7 +10,8 @@ has [qw/_config realm/] => ( is => 'rw' );
 
 sub BUILDARGS {
     my ($class, $config, $app, $realm) = @_;
-    
+
+    # Note _config is horrible back compat hackery!
     { realm => $realm, _config => $config };
 }
 
@@ -41,7 +42,10 @@ sub authenticate {
             return $user_obj;
         }
     } else {
-        $c->log->debug("Unable to locate user matching user info provided") if $c->debug;
+        $c->log->debug(
+            'Unable to locate user matching user info provided in realm: '
+            . $realm->name
+            ) if $c->debug;
         return;
     }
 }
@@ -121,7 +125,7 @@ provided against the user retrieved from the store.
 =head1 CONFIGURATION
 
     # example
-    __PACKAGE__->config->{'Plugin::Authentication'} = 
+    __PACKAGE__->config('Plugin::Authentication' => 
                 {  
                     default_realm => 'members',
                     realms => {