api_key => $self->key,
secret => $self->secret
) );
-
+
return $self;
}
session_uid => $self->fbconnect->session_uid,
session_key => $self->fbconnect->session_key,
session_expires => $self->fbconnect->session_expires
- };
+ };
my $user_obj = $realm->find_user( $user, $c );
-
+
return $user_obj if ref $user_obj;
$c->log->debug( 'Verified FBConnect itentity failed' ) if $self->debug;
=head1 COPYRIGHT
-Copyright (c) 2009 Sinapticode. All rights reserved
+Copyright (c) 2009 Sinapticode. All rights reserved
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.