=encoding utf8

=head1 NAME

Net::OAuth2::Client - client for OAuth2 access, deprecated interface

=head1 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"
   );

=head1 DESCRIPTION

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

=head1 METHODS

=head2 Constructors

=over 4

=item Net::OAuth2::Client-E<gt>B<new>($id, $secret, %options)

This object collects all %options to be used when L<web_server()|Net::OAuth2::Client/"Actions"> creates
a profile.

The $id will be translated into OPTION C<client_id>, and $secret to
C<client_secret>.

=back

=head2 Accessors

=over 4

=item $obj-E<gt>B<id>()

=item $obj-E<gt>B<secret>()

=item $obj-E<gt>B<user_agent>()

=back

=head2 Actions

=over 4

=item $obj-E<gt>B<password>(%options)

Create a L<Net::OAuth2::Profile::Password|Net::OAuth2::Profile::Password> object, based on all options
passed with L<new()|Net::OAuth2::Client/"Constructors">, overruled/extended by the %options passed here.

=item $obj-E<gt>B<web_server>(%options)

Create a L<Net::OAuth2::Profile::WebServer|Net::OAuth2::Profile::WebServer> object, based on all options
passed with L<new()|Net::OAuth2::Client/"Constructors">, overruled/extended by the %options passed here.

=back

=head1 COPYRIGHTS

Copyrights 2013-2019 on the perl code and the related documentation
 by [Mark Overmeer <markov@cpan.org>] for SURFnet bv, The Netherlands.  For other contributors see L</Changes>.

Copyrights 2011-2012 by Keith Grennan.

This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
See F<http://dev.perl.org/licenses/>

