| blib/lib/Net/OAuth2/AuthorizationServer/ClientCredentialsGrant.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 10 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 93 | 20 | 4 | if (my $client = $self->clients->{$client_id}) |
| 97 | 4 | 44 | if (not exists $self->clients->{$client_id}{'scopes'}{$scope}) { } |
| 40 | 4 | elsif ($self->clients->{$client_id}{'scopes'}{$scope}) { } | |
| 105 | 4 | 12 | unless defined $client_secret |
| 108 | 4 | 8 | if ($client_secret ne $self->clients->{$client_id}{'client_secret'}) |