plate;
use JSON::MaybeXS;
use Path::Tiny;
use List::Util qw(uniq);
my ($base) = @ARGV;
die "need a base" unless $base;
my $json = JSON::MaybeXS->new;
my $in = $json->decode(path('api.json')->slurp_u
r::Self;
use Path::Tiny;
use File::ShareDir;
use URI;
use URI::QueryParam;
use URI::Template;
use JSON::MaybeXS;
use Time::Moment;
use Syntax::Keyword::Try;
use Cache::LRU;
use Ryu::Async;
use Ryu::
ync::Github::Repository;
use Net::Async::Github::RateLimit;
use Net::Async::Github::Comment;
use JSON::MaybeUTF8 qw(:v2);
=head1 METHODS
=head2 current_user
Returns information about the current u
),
data => {
sha => $args{sha},
force => ($args{force} ? JSON->true : JSON->false)
},
)
}
=head2 create_pr
Creates a new pull request.
Takes the follo
endpoint
Expands the selected URI via L<URI::Template>. Each item is defined in our C< endpoints.json >
file.
Returns a L<URI> instance.
=head2 http
Accessor for the HTTP client object. Will load
tly defined by github in
L<https://developer.github.com/v3/media/> as C<application/vnd.github.v3+json>.
=head2 base_uri
The L<URI> for requests. Defaults to L<https://api.github.com>.
=head2 http_