X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2Fstemmaweb.git;a=blobdiff_plain;f=lib%2Fstemmaweb%2FAuthentication%2FCredential%2FGoogle.pm;h=ec8ec8a5a207e6b54c508ef23f541490b3333c57;hp=90308aee32876bf917d95f97b761a50b2041abc1;hb=b1d9ab02c0b3c923596ebae9d3e2e4c45397c8f7;hpb=927341ac8d4d83f19ee6ffef578dd8fa5a1390a9

diff --git a/lib/stemmaweb/Authentication/Credential/Google.pm b/lib/stemmaweb/Authentication/Credential/Google.pm
index 90308ae..ec8ec8a 100644
--- 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;
 }