File Coverage

blib/lib/SignalWire/Agents/REST/Namespaces/Project.pm

Criterion	Covered	Total	%
statement	17	23	73.9
branch			n/a
condition			n/a
subroutine	6	9	66.6
pod	0	3	0.0
total	23	35	65.7

package SignalWire::Agents::REST::Namespaces::Project;
use strict;
use warnings;
use Moo;

# --- ProjectTokens ---
package SignalWire::Agents::REST::Namespaces::Project::Tokens;
use Moo;
extends 'SignalWire::Agents::REST::Namespaces::Base';

sub create {
    my ($self, %kwargs) = @_;
    return $self->_http->post($self->_base_path, body => \%kwargs);
}

sub update {
    my ($self, $token_id, %kwargs) = @_;
    return $self->_http->patch($self->_path($token_id), body => \%kwargs);
}

sub delete_token {
    my ($self, $token_id) = @_;
    return $self->_http->delete_request($self->_path($token_id));
}

# --- ProjectNamespace ---
package SignalWire::Agents::REST::Namespaces::Project;
use Moo;

has '_http'  => ( is => 'ro', required => 1 );
has 'tokens' => ( is => 'lazy' );

sub _build_tokens {
    my ($self) = @_;
    return SignalWire::Agents::REST::Namespaces::Project::Tokens->new(
        _http      => $self->_http,
        _base_path => '/api/project/tokens',
    );
}

1;