Condition Coverage

blib/lib/Circle/Net/IRC/Channel.pm
Criterion Covered Total %
condition 0 25 0.0


or 2 conditions

line l !l condition
840 0 0 $_[1] || ''
856 0 0 $irc->isupport('prefix_flags') || ''

or 3 conditions

line l !l&&r !l&&!r condition
47 0 0 0 $self->{'autojoin'} or $self->{'rejoin_on_connect'}
78 0 0 0 $args{'key'} // $self->{'key'}
254 0 0 0 @mode_added or @mode_deleted
0 0 0 @mode_added or @mode_deleted or not defined $self->get_prop_modestr
292 0 0 0 not defined $old_myflag or $old_myflag ne $myflag
822 0 0 0 $net->get_prop_nick || $net->{'configured_nick'}
875 0 0 0 $self->{'widget_occupants_completegroup'} ||= do { my $registry = $self->{'registry'}; my $widget = $registry->construct('Circle::Widget::Entry::CompleteGroup', 'suffix_sol', ': '); my %key_to_nick; $self->watch_property('occupants', 'on_set', sub { my(undef, $occupants) = @_; $widget->set(map({$key_to_nick{$_} = $occupants->{$_}{'nick'};} keys %$occupants)); } , 'on_add', sub { my(undef, $key, $occ) = @_; $widget->add($key_to_nick{$key} = $occ->{'nick'}); } , 'on_del', sub { my(undef, $key) = @_; $widget->remove(delete $key_to_nick{$key}); } ); my $occupants = $self->get_prop_occupants; $widget->set(map({$key_to_nick{$_} = $occupants->{$_}{'nick'};} keys %$occupants)); $widget }