Branch Coverage

blib/lib/Text/Amuse/Compile/File.pm
Criterion Covered Total %
branch 170 268 63.4


line true false branch
182 19 284 if ($self->virtual) { }
187 0 284 unless $header and %$header
203 0 276 if $self->virtual
204 271 5 if (my $fileobj = $self->fileobj) { }
245 222 16 if (not $self->virtual and -f $self->muse_file)
248 2 220 if (grep {/^; +;;;#\w+/;} @lines)
262 6 64 if ($line =~ /\A; +;;;(#[A-Za-z0-9_-]+\w+.*)\z/s) { }
31 33 elsif (not $blank) { }
265 5 1 unless ($in_volume_meta)
268 3 2 if (@current)
280 12 52 if ($in_meta) { }
288 2 0 if (@current)
300 48 334 if (exists $self->options->{'cover'})
301 26 22 if ($self->_looks_like_a_sane_name($self->options->{'cover'})) { }
308 37 297 if (my $cover = $self->file_header->cover)
319 8 280 if (exists $self->options->{'coverwidth'})
324 43 237 if ($self->file_header->cover)
354 2534 93 unless not !$self->file_header->$method && !$self->options->{$method}
387 0 857 unless $format and $ref
390 12905 1401 if (defined $ref->{$k}) { }
391 866 12039 if ($k eq 'logo' or $k eq 'cover') { }
283 11756 elsif (ref $ref->{$k}) { }
392 116 750 if (my $checked = $self->_looks_like_a_sane_name($ref->{$k}))
488 0 8509 if $ext eq ".muse"
491 139 8370 if (-f $target)
493 0 139 unless unlink $target
526 0 0 unless open my $fh, ">:encoding(UTF-8)", $target
531 0 0 unless close $fh
619 0 0 unless $size
625 0 0 if ($pdf) { }
662 0 240 if @args % 2
664 7 233 unless (@args or $self->standalone)
685 2 238 if ($volumes and @$volumes > 1)
690 2 0 if ($full =~ /$tex_parse/s)
697 0 2 $$template_body =~ /latex_body.*tableofcontents/s ? :
698 0 2 $$template_body =~ /printindex.*latex_body/s ? :
705 2 3 if (my(@raw_indexes) = $self->document_indexes)
721 3 2 if ($i != $toc_i)
724 3 2 if ($i != $idx_i)
735 5 0 if ($out =~ /$tex_parse/s)
764 0 9 if $self->virtual
767 0 9 unless $self->wants_slides
780 0 0 unless (-f $source)
783 0 0 if ($source)
784 0 0 unless -f $source
785 0 0 if (my $out = $self->_compile_pdf($source))
796 0 0 unless (-f $source)
799 0 0 unless -f $source
801 0 0 if (my $out = $self->_compile_pdf($source))
811 0 0 unless $source
812 0 0 if ($source =~ /(.+)\.tex$/) { }
827 0 0 unless $self->indexes
836 0 0 if (@run_xindy)
840 0 0 if ($i > 2 and @run_xindy)
843 0 0 unless system(@$exec) == 0
846 0 0 $self->luatex ? :
847 0 0 $self->luatex ? :
853 0 0 if ($line =~ /^[!#]/)
854 0 0 if ($line =~ /^! Paragraph ended before/)
861 0 0 if ($line =~ /^! LaTeX Error: Unknown option.*fragile.*for package.*bigfoot/)
882 0 0 if ($shitout)
896 0 0 unless ($ok)
898 0 0 if (-f $logfile) { }
925 24 26 unless (-f $target)
928 0 50 unless -f $target
929 0 50 unless copy($target, $tempdirname)
936 0 0 unless copy($attach, $tempdirname)
939 8 17 if (my $cover = $self->cover)
940 6 2 if (-f $cover)
941 0 6 unless copy($cover, $tempdirname)
946 0 25 unless $zip->addTree($tempdirname, $self->name) == 0
948 0 25 unless $zip->writeToFileNamed($zipname) == 0
962 10 59 if ($text->can('as_splat_html_with_attrs')) { }
976 0 69 if (my $missing = scalar(@pieces) - scalar(@toc))
982 67 2 if ($self->epub_embed_fonts)
984 67 0 if (my $fonts = $self->fonts)
987 12 189 if ($family->has_files)
991 48 0 unless ($done{$ff->basename})
1014 9 60 if (my $cover = $self->cover)
1015 7 2 if (-f $cover)
1016 7 0 if (my $basename = File::Basename::basename($cover))
1055 16 53 if ($text->header_defined->{'author'})
1058 14 2 if $text->wants_preamble
1067 69 0 if ($text->header_defined->{'title'}) { }
1070 67 2 if $text->wants_preamble
1076 2 67 if ($text->header_defined->{'subtitle'})
1078 2 0 if $text->wants_preamble
1080 1 68 if ($text->header_defined->{'date'})
1081 0 1 if ($header->{'date'} =~ /([0-9]{4})/)
1084 1 0 if $text->wants_preamble
1091 2 0 if ($text->header_defined->{'seriesname'} and $text->header_defined->{'seriesnumber'})
1108 24 390 if ($text->header_defined->{$k})
1111 22 2 if ($method)
1114 2 22 if ($k eq "isbn")
1117 22 2 if $text->wants_postamble
1126 0 69 unless $self->tt->process($self->templates->minimal_html, {"title", $self->_remove_tags($header->{'title'} || 'Untitled'), "text", $titlepage, "html_direction", $text->html_direction, "language_code", $text->language_code}, \$firstpage)
1160 0 123 unless $target
1161 109 14 if (my $file = $internal_links{$target}) { }
1179 0 313 unless $self->tt->process($self->templates->minimal_html, {"title", $self->_remove_tags($title), %$piece}, \$xhtml)
1200 1 5 unless -f $att
1216 0 389 unless $level
1217 0 389 unless $level =~ /\A[1-4]\z/
1222 234 30 if (my $parent = $levelnavs{$checklevel})
1228 155 234 unless ($current)
1245 0 494 unless defined $string
1252 0 505 unless defined $string
1299 26 1 if ($logger) { }
1316 0 1 unless $logfile
1317 1 0 if (-f $logfile)
1323 0 1 unless open my $fh, "<:raw", $logfile
1331 4 1253 if ($line =~ /^missing character/i) { }
2 1251 elsif ($line =~ /^Overfull/) { }
2 1249 elsif ($continue) { }
1354 5 0 if (my $f = $self->status_file)
1355 4 1 if (-f $f) { }
1356 0 4 unless unlink $f
1368 0 367 unless $template_ref and $tokens and $outfile
1370 0 367 unless open my $fh, ">:encoding(UTF-8)", $outfile
1374 0 367 if ($@)
1387 0 249 unless $template_body
1398 12 237 unless ($template_options)
1402 160 344 if (exists $options{$method})
1434 1 248 if (index($$template_body, "[% IF enable_secondary_footnotes %]", 0) < 0)
1450 5 244 if (my(@raw_indexes) = $self->document_indexes)
1496 5 244 @indexes ? :
1499 22 227 if ($self->nocoverpage or $self->coverpage_only_if_toc and not $doc->wants_toc)
1507 239 10 unless ($parsed{'notoc'})
1508 159 80 if ($doc->wants_toc)
1639 0 914 unless defined $name
1644 772 142 if (not $out or $@) { }
1656 0 12 unless $att
1658 4 8 if ($att =~ /\.jpe?g$/) { }
8 0 elsif ($att =~ /\.png$/) { }
1677 16 240 $self->virtual ? :