name 'Catalyst-Authentication-Credential-FBConnect';
all_from 'lib/Catalyst/Authentication/Credential/FBConnect.pm';
+requires 'MooseX::Types';
+requires 'MooseX::Types::Common';
requires 'namespace::autoclean';
requires 'WWW::Facebook::API';
requires 'Moose';
package Catalyst::Authentication::Credential::FBConnect;
use Moose;
-use namespace::autoclean;
-
-has debug => ( is => 'ro' );
-has key => ( is => 'ro' );
-has secret => ( is => 'ro' );
-has app_name => ( is => 'ro' );
-has fbconnect => ( is => 'ro', lazy_build => 1, init_arg => undef );
-
-has realm => ( is => 'ro', required => 1, weak_ref => 1 );
-
+use MooseX::Types::Moose qw/ Bool /;
+use MooseX::Types::Common::String qw/ NonEmptySimpleStr /;
use WWW::Facebook::API;
use Catalyst::Exception ();
+use namespace::autoclean;
+
+has debug => ( is => 'ro', isa => Bool, );
+has key => ( is => 'ro', isa => NonEmptySimpleStr, required => 1 );
+has secret => ( is => 'ro', isa => NonEmptySimpleStr, required => 1 );
+has app_name => ( is => 'ro', isa => NonEmptySimpleStr, required => 1 );
+has fbconnect => ( is => 'ro', lazy_build => 1, init_arg => undef, isa => 'WWW::Facebook::API' );
sub BUILDARGS {
my ($class, $config, $c, $realm) = @_;
- return {
- %{ $config },
- %{ $realm->{config} }, # Ewww, gross hack to steal the realms config too.
- realm => $realm,
- };
+ return $config;
}
sub BUILD {