blib/lib/Perl/Critic/Policy/Documentation/ProhibitLinkToSelf.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 16 | 20 | 80.0 |
line | true | false | branch |
---|---|---|---|
75 | 7 | 1 | if ($command eq 'head1') |
82 | 8 | 0 | unless ($command_non_text{$command}) |
99 | 0 | 11 | unless ($self->{'in_begin'} eq '' or $self->{'in_begin'} =~ /^:/) |
105 | 10 | 1 | if ($self->{'in_name'}) |
106 | 6 | 4 | if ($str =~ /^\s*([[:word:]:]+)\s*-/) |
125 | 0 | 7 | if ($cmd eq 'X') { } |
6 | 1 | elsif ($cmd eq 'L') { } | |
136 | 6 | 0 | if (defined $name and $self->{'own_package_names'}{$name}) |
143 | 1 | 5 | $self->{'in_see_also'} ? : |
148 | 1 | 5 | defined $display ? : |