SYNOPSIS

# This module provides the deprecated interface
my $client = Net::OAuth2::Client->new(
$client_id,
$client_secret,
site => $site
);
my $auth = $client->web_server(
redirect_path => "$site/auth/facebook/callback"
);
# interface since v0.50
my $client = Net::OAuth2::Profile::WebServer->new(
client_id => $client_id,
client_secret => $client_secret,
site => $site
redirect_uri => "$site/auth/facebook/callback"
);

DESCRIPTION

This module is kept to translate the expired interface into the new interface.

METHODS

Constructors

Net::OAuth2::Client->new($id, $secret, %options)

This object collects all %options to be used when web_server() creates a profile.

The $id will be translated into OPTION "client_id", and $secret to "client_secret".

Accessors

$obj->id()

$obj->secret()

$obj->user_agent()

Actions

$obj->password(%options)

Create a Net::OAuth2::Profile::Password object, based on all options passed with new(), overruled/extended by the %options passed here.

$obj->web_server(%options)

Create a Net::OAuth2::Profile::WebServer object, based on all options passed with new(), overruled/extended by the %options passed here.

COPYRIGHTS

Copyrights 2013-2016 on the perl code and the related documentation
 by [Mark Overmeer] for SURFnet bv, The Netherlands.  For other contributors see Changes.

Copyrights 2011-12 by Keith Grennan.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See http://www.perl.com/perl/misc/Artistic.html