• FaceBook.pm

    464 465  
    51 51 $self->{$_} = $config{$_} || $state->{session}{$_} || return undef;
    52 52 }
    53 53 $self->{timeout} = $state->{session}{connection_timeout} || 3;
    54 for (qw(facebook_user_post_url facebook_redirect_uri)) {
    54 for (qw(facebook_user_post_url facebook_redirect_uri facebook_scope)) {
    55 55 $self->{$_} = $config{$_} || $state->{session}{$_};
    56 56 }
    57 57 return $self;
     
    63 63 my $go = URI->new( $self->{facebook_authorize_url} );
    64 64 $go->query_param( client_id => $self->{facebook_app_id} );
    65 65 $go->query_param( state => $args{state} ) if $args{state};
    66 $go->query_param( scope => "publish_stream" );
    66 $go->query_param( scope => $self->{facebook_scope} ) if $self->{facebook_scope};
    67 67 $args{redirect_uri} ||= $self->{facebook_redirect_uri};
    68 68 for ( keys %args ) {
    69 69 $go->query_param( $_ => $args{$_} );