| line |
true |
false |
branch |
|
56
|
0 |
0 |
unless $self->SUPER::init($args) |
|
59
|
0 |
0 |
unless my $name = $self->{'OM_package'} = delete $args->{'package'} |
|
62
|
0 |
0 |
unless $self->{'OM_source'} = delete $args->{'source'} |
|
65
|
0 |
0 |
unless $self->{'OM_version'} = delete $args->{'version'} |
|
68
|
0 |
0 |
unless $self->{'OM_distr'} = delete $args->{'distribution'} |
|
70
|
0 |
0 |
unless $self->{'OM_parser'} = delete $args->{'parser'} |
|
72
|
0 |
0 |
unless $self->{'OM_index'} = delete $args->{'index'} |
|
101
|
0 |
0 |
unless $it |
|
104
|
0 |
0 |
unless builtin::blessed($it) |
|
106
|
0 |
0 |
unless $it->isa("OODoc::Text::Chapter") |
|
109
|
0 |
0 |
if (my $old = $self->{'OM_chapter_hash'}{$name}) |
|
124
|
0 |
0 |
if (@_) |
|
134
|
0 |
0 |
if defined $self->{'OM_name'} |
|
136
|
0 |
0 |
unless my $chapter = $self->chapter("NAME") |
|
140
|
0 |
0 |
unless $text =~ /^\s*(\S+)\s*\-\s*(.+?)\s*$/ |
|
159
|
0 |
0 |
defined $package ? : |
|
164
|
0 |
0 |
if defined $sub |
|
182
|
0 |
0 |
unless $args{'select'} |
|
185
|
0 |
0 |
unless @select |
|
206
|
0 |
0 |
if (@_) { } |
|
228
|
0 |
0 |
$self->package eq $name ? : |
|
253
|
0 |
0 |
if $self->isPurePod |
|
264
|
0 |
0 |
if $name->can("willRealize") |
|
272
|
0 |
0 |
if $self->{'OM_is_expanded'} |
|
342
|
0 |
0 |
if (my $extended = $extended{$name}) { } |
|
346
|
0 |
0 |
unless ($used{$name}++) |
|
359
|
0 |
0 |
if $used{$name} |
|
386
|
0 |
0 |
defined $args{'this'} ? : |
|
387
|
0 |
0 |
defined $args{'super'} ? : |
|
388
|
0 |
0 |
unless my $container = $args{'container'} |
|
397
|
0 |
0 |
unless (&first(sub {
&$equal($take, $_);
}
, @this)) |
|
398
|
0 |
0 |
unless @joined and $joined[-1]->path eq $take->path |
|
408
|
0 |
0 |
if &$equal($take, $insert) |
|
410
|
0 |
0 |
if (&first(sub {
&$equal($insert, $_);
}
, @super)) |
|
416
|
0 |
0 |
unless @joined and $joined[-1]->path eq $insert->path |
|
429
|
0 |
0 |
unless my $inherit = $thing->extends |
|
436
|
0 |
0 |
if $path1 eq $path2 |
|
439
|
0 |
0 |
if $lpath1 < $lpath2 and substr($path2, 0, $lpath1 + 1) eq "$path1/" |
|
442
|
0 |
0 |
if $lpath2 < $lpath1 and substr($path1, 0, $lpath2 + 1) eq "$path2/" |
|
445
|
0 |
0 |
if $self eq $thing->manual |
|
456
|
0 |
0 |
if defined $has |
|
460
|
0 |
0 |
if ($self->name ne $self->package) |
|
469
|
0 |
0 |
if (my $realized = $self->realizes) |
|
471
|
0 |
0 |
if builtin::blessed($realized) |
|
474
|
0 |
0 |
if (my(@extras) = $self->extraCode) |
|
484
|
0 |
0 |
if (my(@subclasses) = $self->subClasses) |
|
489
|
0 |
0 |
if (my(@realized) = $self->realizers) |
|
494
|
0 |
0 |
if $output and $output =~ /\S/ |
|
502
|
0 |
0 |
$package =~ /^[aeio]/i ? : |
|
504
|
0 |
0 |
unless ref $package |
|
507
|
0 |
0 |
if (my $realizes = $package->realizes) |
|
512
|
0 |
0 |
unless my(@supers) = $package->superClasses |
|
528
|
0 |
0 |
unless $self->name eq $self->package |
|
534
|
0 |
0 |
if (my $realized = $self->realizes) |
|
536
|
0 |
0 |
if builtin::blessed($realized) |
|
539
|
0 |
0 |
if (my(@extras) = $self->extraCode) |
|
543
|
0 |
0 |
if @supers |
|
545
|
0 |
0 |
if (my(@subclasses) = $self->subClasses) |
|
549
|
0 |
0 |
if (my(@realized) = $self->realizers) |
|
567
|
0 |
0 |
unless my $chapter = $self->chapter(uc $name) |
|
601
|
0 |
0 |
unless my $chapters = $self->chapters |
|
607
|
0 |
0 |
$manual eq $package ? : |