line |
true |
false |
branch |
29
|
0 |
0 |
unless $self->SUPER::init($args) |
38
|
0 |
0 |
if (my $ss = $self->{'OFH_style'} = delete $args->{'html_stylesheet'}) |
49
|
0 |
0 |
@_ ? : |
65
|
0 |
0 |
unless defined $text |
68
|
0 |
0 |
if ($object->isa('OODoc::Manual')) { } |
91
|
0 |
0 |
unless my $manual = $args{'manual'} |
105
|
0 |
0 |
unless (defined $self->{'OFH_markers'}) |
107
|
0 |
0 |
unless my $mark = 'IO::File'->new($markers, 'w') |
121
|
0 |
0 |
if $verbose > 2 |
124
|
0 |
0 |
unless my $output = 'IO::File'->new($cooked, 'w') |
154
|
0 |
0 |
if (defined $source) { } |
155
|
0 |
0 |
unless -d $source |
160
|
0 |
0 |
unless -d $source |
171
|
0 |
0 |
if -f $fn |
184
|
0 |
0 |
if $verbose > 2 |
187
|
0 |
0 |
if ($raw =~ /$process/) { } |
189
|
0 |
0 |
unless my $output = 'IO::File'->new($cooked, 'w') |
202
|
0 |
0 |
unless copy($raw, $cooked) |
208
|
0 |
0 |
unless chmod $rawmode, $cooked |
223
|
0 |
0 |
if (ref $loc eq 'HASH') { } |
|
0 |
0 |
elsif (-d $loc) { } |
|
0 |
0 |
elsif (-f $loc) { } |
232
|
0 |
0 |
if -f $fn |
248
|
0 |
0 |
unless my $text = $args{'structure'} |
252
|
0 |
0 |
unless my $output = $args{'output'} |
253
|
0 |
0 |
unless my $manual = $args{'manual'} |
271
|
0 |
0 |
unless $super->description =~ /^\s*$/ |
274
|
0 |
0 |
if (defined $super) |
283
|
0 |
0 |
if $examples eq 'EXPAND' |
292
|
0 |
0 |
unless my $text = $args{'structure'} |
296
|
0 |
0 |
unless my $output = $args{'output'} |
297
|
0 |
0 |
unless my $manual = $args{'manual'} |
308
|
0 |
0 |
unless my $manual = $args{'manual'} |
312
|
0 |
0 |
if not $diags and @diags |
315
|
0 |
0 |
unless $diags |
317
|
0 |
0 |
if defined $diags |
326
|
0 |
0 |
unless my $examples = $args{'examples'} |
327
|
0 |
0 |
unless @$examples |
329
|
0 |
0 |
unless my $manual = $args{'manual'} |
330
|
0 |
0 |
unless my $output = $args{'output'} |
352
|
0 |
0 |
unless my $diagnostics = $args{'diagnostics'} |
353
|
0 |
0 |
unless @$diagnostics |
355
|
0 |
0 |
unless my $manual = $args{'manual'} |
356
|
0 |
0 |
unless my $output = $args{'output'} |
381
|
0 |
0 |
unless my $output = $args{'output'} |
382
|
0 |
0 |
unless my $sub = $args{'subroutine'} |
394
|
0 |
0 |
unless my $subroutine = $args{'subroutine'} |
395
|
0 |
0 |
unless my $manual = $args{'manual'} |
396
|
0 |
0 |
unless my $output = $args{'output'} |
406
|
0 |
0 |
if length $paramlist |
409
|
0 |
0 |
$type eq 'tie' ? : |
|
0 |
0 |
$type eq 'function' ? : |
|
0 |
0 |
$type eq 'overload' ? : |
|
0 |
0 |
$type eq 'ci_method' ? : |
|
0 |
0 |
$type eq 'c_method' ? : |
|
0 |
0 |
$type eq 'i_method' ? : |
426
|
0 |
0 |
if ($manual->inherited($subroutine)) |
437
|
0 |
0 |
unless my $output = $args{'output'} |
442
|
0 |
0 |
unless my $subroutine = $args{'subroutine'} |
443
|
0 |
0 |
unless my $manual = $args{'manual'} |
444
|
0 |
0 |
unless my $output = $args{'output'} |
447
|
0 |
0 |
$manual->inherited($subroutine) ? : |
454
|
0 |
0 |
$args{'last'} ? : |
461
|
0 |
0 |
unless my $output = $args{'output'} |
472
|
0 |
0 |
unless my $output = $args{'output'} |
473
|
0 |
0 |
unless my $option = $args{'option'} |
474
|
0 |
0 |
unless my $manual = $args{'manual'} |
479
|
0 |
0 |
if length $params |
489
|
0 |
0 |
unless my $output = $args{'output'} |
490
|
0 |
0 |
unless my $option = $args{'option'} |
491
|
0 |
0 |
unless my $manual = $args{'manual'} |
495
|
0 |
0 |
unless my $where = $option->findDescriptionObject |
498
|
0 |
0 |
if length $descr |
508
|
0 |
0 |
unless my $rows = $args{'rows'} |
509
|
0 |
0 |
unless @$rows |
511
|
0 |
0 |
unless my $head = $args{'header'} |
512
|
0 |
0 |
unless my $output = $args{'output'} |
529
|
0 |
0 |
unless my $manual = $args{'manual'} |
530
|
0 |
0 |
unless my $subroutine = $args{'subroutine'} |
533
|
0 |
0 |
unless length $text |
535
|
0 |
0 |
unless my $output = $args{'output'} |
538
|
0 |
0 |
unless my $extends = $self->extends |
539
|
0 |
0 |
unless my $refer = $extends->findDescriptionObject |
547
|
0 |
0 |
unless my $manual = $args{'manual'} |
548
|
0 |
0 |
unless my $subroutine = $args{'subroutine'} |
549
|
0 |
0 |
unless my $output = $args{'output'} |
600
|
0 |
0 |
unless my $manual = $self->manual |
613
|
0 |
0 |
unless my $manual = $self->manual |
624
|
0 |
0 |
defined $manual ? : |
631
|
0 |
0 |
defined $manual ? : |
644
|
0 |
0 |
unless my $manual = $self->manual |
648
|
0 |
0 |
unless my $chapter = $manual->chapter('NAME') |
653
|
0 |
0 |
if $descr =~ /^ \s*\S+\s*\-\s*(.*?)\s* $ /x |
671
|
0 |
0 |
unless keys %$attrs == 1 |
675
|
0 |
0 |
unless my $path = $path_lookup{$to} |
692
|
0 |
0 |
unless my $chapter = $manual->chapter('INHERITANCE') |
718
|
0 |
0 |
if defined $if and length $if |
722
|
0 |
0 |
unless defined $name |
727
|
0 |
0 |
unless defined $manual |
728
|
0 |
0 |
unless my $chapter = $manual->chapter($name) |
747
|
0 |
0 |
if defined $if and length $if |
751
|
0 |
0 |
unless defined $group |
758
|
0 |
0 |
unless ($start eq 'ALL') |
763
|
0 |
0 |
unless ($types eq 'ALL') |
764
|
0 |
0 |
$_ eq 'method' ? : |
775
|
0 |
0 |
if ($group eq 'SUBROUTINES') { } |
|
0 |
0 |
elsif ($group eq 'DIAGNOSTICS') { } |
|
0 |
0 |
elsif ($group eq 'DETAILS') { } |
|
0 |
0 |
elsif ($group eq 'MANUALS') { } |
793
|
0 |
0 |
unless my(@diags) = &$select($sub->diagnostics) |
812
|
0 |
0 |
unless my $details = $manual->chapter('DETAILS') |
817
|
0 |
0 |
if @subsect or $section->description |
821
|
0 |
0 |
unless @sections or length $details->description |
856
|
0 |
0 |
if defined $if and length $if |
860
|
0 |
0 |
unless defined $group |
865
|
0 |
0 |
unless my $manual = $self->manual |
869
|
0 |
0 |
unless ($types eq 'ALL') |
870
|
0 |
0 |
$_ eq 'method' ? : |
879
|
0 |
0 |
if ($group eq 'ALL') { } |
881
|
0 |
0 |
if (not @subs or $show_sub eq 'NO') { } |
|
0 |
0 |
elsif ($show_sub eq 'COUNT') { } |
888
|
0 |
0 |
unless my $chapter = $manual->chapter($group) |
890
|
0 |
0 |
$show_sec eq 'NO' ? : |
892
|
0 |
0 |
@sections ? : |
899
|
0 |
0 |
@subs && $show_sub eq 'COUNT' ? : |
901
|
0 |
0 |
if ($show_sec eq 'NO') { } |
|
0 |
0 |
elsif ($show_sec eq 'LINK' or $show_sec eq 'NAME') { } |
904
|
0 |
0 |
if (not @subs) { } |
|
0 |
0 |
elsif ($show_sec eq 'LINK') { } |
|
0 |
0 |
elsif ($show_sec eq 'NAME') { } |
913
|
0 |
0 |
if @subs and $show_sub eq 'LIST' |
925
|
0 |
0 |
$show_sub eq 'COUNT' ? : |
|
0 |
0 |
!@subs ? : |
929
|
0 |
0 |
if ($show_sec eq 'LINK') { } |
937
|
0 |
0 |
if $show_sub eq 'LIST' and @subs |
943
|
0 |
0 |
if $show_sec eq 'LINK' or $show_sec eq 'NAME' |