add custom form

[scpubgit/stemmaweb.git] / lib / stemmaweb / Authentication / Credential / Google.pm

diff --git a/lib/stemmaweb/Authentication/Credential/Google.pm b/lib/stemmaweb/Authentication/Credential/Google.pm
index 90308ae..ec8ec8a 100644 (file)
--- a/lib/stemmaweb/Authentication/Credential/Google.pm
+++ b/lib/stemmaweb/Authentication/Credential/Google.pm
@@ -28,6 +28,8 @@ sub new {
     my ($class, $config, $app, $realm) = @_;
     $class = ref $class || $class;
 
+    warn "MEEP\n\n";
+
     my $self = {
         _config => $config,
         _app    => $app,
@@ -92,6 +94,7 @@ sub authenticate {
             username => $sub,
             password => $user->password,
             role     => $user->role,
+            active   => $user->active,
         });
 
     foreach my $t (@{ $user->traditions }) {
@@ -108,6 +111,7 @@ sub authenticate {
 
     $realm->delete_user({ username => $user->id });
 
+
     return $new_user;
 }