Branch Coverage

blib/lib/Mariachi.pm
Criterion Covered Total %
branch 0 70 0.0


line true false branch
67 0 0 unless $start
84 0 0 unless my $folder = 'Mariachi::Folder'->new($self->config->input)
89 0 0 if $ENV{'M_CACHE'}
90 0 0 if ($cache and -e $cache and not $self->config->refresh)
100 0 0 if ++$count % 100 == 0
104 0 0 if ($cache)
125 0 0 if ($seen{$msgid}++)
150 0 0 unless my $hdr = $mail->header($_)
152 0 0 unless $hdr =~ s[<[^>]*?/][<]g
208 0 0 if $self->config->reverse
227 0 0 unless my $cont = shift()
228 0 0 unless my $mail = $cont->message
237 0 0 unless %mails
245 0 0 if ($seen{$x}++)
248 0 0 if $last and not grep({$last == $_;} $x->children)
271 0 0 unless my $mail = $_[0]->message
272 0 0 if $prev
299 0 0 if ($depth and $depth % 6 == 0 and $cont->parent->child == $cont)
314 0 0 unless my $root = $top->message->root
315 0 0 if ($root->message)
351 0 0 unless copy("$dir/$_", $self->config->output . "/$_")
382 0 0 if $n == 1
407 0 0 unless $self->tt->process($template, {@_, 'mariachi', $self, 'spool', $spool, 'nthpage', sub { $self->nthpage(shift(), $spool); } , 'again', sub { $again; } , 'file', sub { $file; } , 'set_again', sub { $again = shift(); return; } , 'set_file', sub { $file = shift(); return; } }, $self->config->output . "/$$.tmp")
411 0 0 unless move($self->config->output . "/$$.tmp", $self->config->output . "/$file")
424 0 0 unless $self->config->lurker
466 0 0 unless my $c = shift()
468 0 0 if (my $mail = $c->message)
470 0 0 unless (-e $self->config->output . '/' . $mail->filename and not $self->config->refresh)
517 0 0 if (my $mail = eval { do { $_[0]->message } })
519 0 0 unless -e $self->config->output . '/' . $mail->filename and not $self->config->refresh
531 0 0 if $i > 0
532 0 0 if $i + 1 < @threads
540 0 0 unless my $mail = $_[0]->message
541 0 0 if ++$count % 100 == 0
543 0 0 unless $tt->process('message.tt2', {'base', '../../../', 'mariachi', $self, 'thread', $root, 'message', $mail, 'container', $_[0]}, $self->config->output . '/' . $mail->filename)