Branch Coverage

blib/lib/CGI/Builder/Auth/Context.pm
Criterion Covered Total %
branch 24 44 54.5


line true false branch
25 0 6 ref $_[0]->owner && $_[0]->owner->can('cs') ? :
58 2 0 unless ref $user
59 2 0 $user ? :
63 1 0 unless ref $group
64 1 0 $group ? :
69 2 0 unless ref $group
70 0 2 unless defined $group
76 1 0 unless ref $group
77 0 1 unless defined $group
83 1 0 unless ref $group
84 0 1 unless defined $group
90 0 2 unless my $user = $self->User_factory->load('id', $username)
92 1 1 if ($user->password_matches($pass)) { }
94 0 1 if ($self->session)
105 0 1 if ($self->session)
115 1 2 if $self->user eq $_
123 4 0 unless ref $g
124 1 3 unless defined $g
126 1 0 if $_ eq $self->user
144 0 1 if ($self->session and $token = $self->session->param('CBA_Token'))
147 0 0 if ($digest eq Digest::MD5::md5_hex(join(':', $sid, $time, $username, $self->magic_string)))
160 0 2 ref $_ ? :