blib/lib/Net/LDAP/Class/User.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 20 | 55.0 |
line | true | false | branch |
---|---|---|---|
43 | 0 | 392 | unless (defined $self->group_class) |
59 | 0 | 2 | unless my $group = shift() |
60 | 0 | 2 | unless (ref $group and $group->isa('Net::LDAP::Class::Group')) |
63 | 0 | 2 | unless ($group->ldap_entry) |
70 | 0 | 2 | if ($g->$uniq_method eq $group->$uniq_method) |
89 | 0 | 4 | unless my $group = shift() |
90 | 0 | 4 | unless (ref $group and $group->isa('Net::LDAP::Class::Group')) |
93 | 0 | 4 | unless ($group->ldap_entry) |
102 | 4 | 2 | if ($g->$uniq_method eq $group->$uniq_method) |
107 | 0 | 4 | if (scalar @new == scalar @groups) |