File Coverage

blib/lib/JSON/RPC/Spec/Client.pm

Criterion	Covered	Total	%
statement	14	14	100.0
branch	2	2	100.0
condition			n/a
subroutine	4	4	100.0
pod	1	1	100.0
total	21	21	100.0

package JSON::RPC::Spec::Client;
use Moo;
use Carp ();
with qw(
  JSON::RPC::Spec::Common
);

use namespace::clean;


sub compose {
    my ($self, $method, $params, $id) = @_;
    my @args;
    if (defined $id) {
        @args = (id => $id);
    }
    return $self->coder->encode(
        +{
            jsonrpc => $self->_jsonrpc,
            method  => $method,
            params  => $params,
            @args
        }
    );
}

1;
__END__