File Coverage

lib/App/gh.pm

Criterion	Covered	Total	%
statement	18	28	64.2
branch	0	6	0.0
condition	0	6	0.0
subroutine	6	9	66.6
pod	0	3	0.0
total	24	52	46.1

package App::gh;
use warnings;
use strict;
our $VERSION = '0.66';
use App::gh::Config;
use App::gh::API;
use Net::GitHub;
use Cwd;
require App::gh::Git;

my $GITHUB;

sub config {
    return "App::gh::Config";
}

sub git {
    return App::gh::Git->repository;
}

sub github {
    my $class = shift;
    my $access_token = $class->config->github_access_token;
    return $GITHUB ||= Net::GitHub->new( access_token => $access_token ) if $access_token;

    my $github_id = $class->config->github_id;
    my $github_password = $class->config->github_password;

    die "Please configure your github.user in .gitconfig (see App::gh pod)\n"
        unless $github_id;
    die "Please configure your github.password in .gitconfig (See App::gh pod)\n"
        unless $github_password;

    return $GITHUB ||= Net::GitHub->new(  # Net::GitHub::V3
        login => $github_id,
        pass  => $github_password,
        # $class->config->github_token,
    );
}

1;
__END__