Branch Coverage

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


line true false branch
188 19 288 if ($self->virtual) { }
193 0 288 unless $header and %$header
209 0 280 if $self->virtual
210 275 5 if (my $fileobj = $self->fileobj) { }
251 226 16 if (not $self->virtual and -f $self->muse_file)
254 2 224 if (grep {/^; +;;;#\w+/;} @lines)
268 6 64 if ($line =~ /\A; +;;;(#[A-Za-z0-9_-]+\w+.*)\z/s) { }
31 33 elsif (not $blank) { }
271 5 1 unless ($in_volume_meta)
274 3 2 if (@current)
286 12 52 if ($in_meta) { }
294 2 0 if (@current)
306 48 338 if (exists $self->options->{'cover'})
307 26 22 if ($self->_looks_like_a_sane_name($self->options->{'cover'})) { }
314 37 301 if (my $cover = $self->file_header->cover)
325 8 284 if (exists $self->options->{'coverwidth'})
330 43 241 if ($self->file_header->cover)
360 2562 97 unless not !$self->file_header->$method && !$self->options->{$method}
393 0 869 unless $format and $ref
396 13089 1425 if (defined $ref->{$k}) { }
397 878 12211 if ($k eq 'logo' or $k eq 'cover') { }
287 11924 elsif (ref $ref->{$k}) { }
398 116 762 if (my $checked = $self->_looks_like_a_sane_name($ref->{$k}))
494 0 8621 if $ext eq ".muse"
497 139 8482 if (-f $target)
499 0 139 unless unlink $target
532 0 0 unless open my $fh, ">:encoding(UTF-8)", $target
537 0 0 unless close $fh
625 0 0 unless $size
631 0 0 if ($pdf) { }
668 0 244 if @args % 2
670 7 237 unless (@args or $self->standalone)
691 2 242 if ($volumes and @$volumes > 1)
696 2 0 if ($full =~ /$tex_parse/s)
703 0 2 $$template_body =~ /latex_body.*tableofcontents/s ? :
704 0 2 $$template_body =~ /printindex.*latex_body/s ? :
711 2 3 if (my(@raw_indexes) = $self->document_indexes)
727 3 2 if ($i != $toc_i)
730 3 2 if ($i != $idx_i)
741 5 0 if ($out =~ /$tex_parse/s)
770 0 9 if $self->virtual
773 0 9 unless $self->wants_slides
786 0 0 unless (-f $source)
789 0 0 if ($source)
790 0 0 unless -f $source
791 0 0 if (my $out = $self->_compile_pdf($source))
802 0 0 unless (-f $source)
805 0 0 unless -f $source
807 0 0 if (my $out = $self->_compile_pdf($source))
817 0 0 unless $source
818 0 0 if ($source =~ /(.+)\.tex$/) { }
833 0 0 unless $self->indexes
842 0 0 if (@run_xindy)
846 0 0 if ($i > 2 and @run_xindy)
851 0 0 unless ($xindy_ok)
856 0 0 $self->luatex ? :
857 0 0 $self->luatex ? :
863 0 0 if ($line =~ /^[!#]/)
864 0 0 if ($line =~ /^! Paragraph ended before/)
871 0 0 if ($line =~ /^! LaTeX Error: Unknown option.*fragile.*for package.*bigfoot/)
892 0 0 if ($shitout)
906 0 0 unless ($ok)
908 0 0 if (-f $logfile) { }
935 24 26 unless (-f $target)
938 0 50 unless -f $target
939 0 50 unless copy($target, $tempdirname)
946 0 0 unless copy($attach, $tempdirname)
949 8 17 if (my $cover = $self->cover)
950 6 2 if (-f $cover)
951 0 6 unless copy($cover, $tempdirname)
956 0 25 unless $zip->addTree($tempdirname, $self->name) == 0
958 0 25 unless $zip->writeToFileNamed($zipname) == 0
972 10 59 if ($text->can('as_splat_html_with_attrs')) { }
986 0 69 if (my $missing = scalar(@pieces) - scalar(@toc))
992 67 2 if ($self->epub_embed_fonts)
994 67 0 if (my $fonts = $self->fonts)
997 12 189 if ($family->has_files)
1001 48 0 unless ($done{$ff->basename})
1024 9 60 if (my $cover = $self->cover)
1025 7 2 if (-f $cover)
1026 7 0 if (my $basename = File::Basename::basename($cover))
1065 16 53 if ($text->header_defined->{'author'})
1068 14 2 if $text->wants_preamble
1077 69 0 if ($text->header_defined->{'title'}) { }
1080 67 2 if $text->wants_preamble
1086 2 67 if ($text->header_defined->{'subtitle'})
1088 2 0 if $text->wants_preamble
1090 1 68 if ($text->header_defined->{'date'})
1091 0 1 if ($header->{'date'} =~ /([0-9]{4})/)
1094 1 0 if $text->wants_preamble
1101 2 0 if ($text->header_defined->{'seriesname'} and $text->header_defined->{'seriesnumber'})
1118 24 390 if ($text->header_defined->{$k})
1121 22 2 if ($method)
1124 2 22 if ($k eq "isbn")
1127 22 2 if $text->wants_postamble
1136 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)
1170 0 123 unless $target
1171 109 14 if (my $file = $internal_links{$target}) { }
1189 0 313 unless $self->tt->process($self->templates->minimal_html, {"title", $self->_remove_tags($title), %$piece}, \$xhtml)
1210 1 5 unless -f $att
1226 0 389 unless $level
1227 0 389 unless $level =~ /\A[1-4]\z/
1232 234 30 if (my $parent = $levelnavs{$checklevel})
1238 155 234 unless ($current)
1255 0 494 unless defined $string
1262 0 505 unless defined $string
1309 26 1 if ($logger) { }
1326 0 1 unless $logfile
1327 1 0 if (-f $logfile)
1333 0 1 unless open my $fh, "<:raw", $logfile
1341 4 1253 if ($line =~ /^missing character/i) { }
2 1251 elsif ($line =~ /^Overfull/) { }
2 1249 elsif ($continue) { }
1364 5 0 if (my $f = $self->status_file)
1365 4 1 if (-f $f) { }
1366 0 4 unless unlink $f
1378 0 371 unless $template_ref and $tokens and $outfile
1380 0 371 unless open my $fh, ">:encoding(UTF-8)", $outfile
1384 0 371 if ($@)
1397 0 253 unless $template_body
1408 12 241 unless ($template_options)
1412 160 344 if (exists $options{$method})
1444 1 252 if (index($$template_body, "[% IF enable_secondary_footnotes %]", 0) == -1)
1463 5 248 if (my(@raw_indexes) = $self->document_indexes)
1509 5 248 @indexes ? :
1512 22 231 if ($self->nocoverpage or $self->coverpage_only_if_toc and not $doc->wants_toc)
1520 239 14 unless ($parsed{'notoc'})
1521 159 80 if ($doc->wants_toc)
1652 0 926 unless defined $name
1657 784 142 if (not $out or $@) { }
1669 0 12 unless $att
1671 4 8 if ($att =~ /\.jpe?g$/) { }
8 0 elsif ($att =~ /\.png$/) { }
1690 16 244 $self->virtual ? :