Branch Coverage

lib/BalanceOfPower/Role/Ruler.pm
Criterion Covered Total %
branch 18 26 69.2


line true false branch
31 11 3 if $rel->node2 ne $nation
34 3 421 if (@rels > 0) { }
48 0 0 if $domination
50 0 0 if (@influence > 0) { }
72 18 10 if $rel->node1 ne $nation
86 3 183 if (my $domination = $self->is_under_influence($n)) { }
112 0 3 if ($real_leader)
120 3 0 if ($c eq $leader) { }
122 2 1 $internal_disorder ? :
129 1 2 if ($self->get_nation($c)->progress < $occupied_progress)
159 6 0 if ($new_status and $old_status ne $new_status)
161 0 6 if ($new_status eq 'dominate') { }
2 4 elsif ($new_status eq 'control') { }