blib/lib/CGI/Builder/Auth/Group.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 15 | 22 | 68.1 |
line | true | false | branch |
---|---|---|---|
70 | 2 | 14 | unless $_[0]->_exists |
82 | 0 | 4 | ref $data ? : |
84 | 1 | 3 | if $self->_exists($group) |
86 | 0 | 3 | unless $self->_group_admin->create($group) |
94 | 19 | 16 | defined $_[1] ? : |
99 | 0 | 3 | defined $_[1] ? : |
111 | 0 | 4 | unless $self->_exists($group) |
115 | 0 | 4 | unless $user_factory->_exists($user) |
124 | 0 | 4 | unless $self->_exists($group) |
135 | 0 | 7 | unless $self->_exists($group) |
141 | 16 | 1 | if ref $_group_admin and not &Scalar::Util::isweak($_group_admin) |