Branch Coverage

blib/lib/App/JobLog/Log.pm
Criterion Covered Total %
branch 194 232 83.6


line true false branch
38 0 70 if ref $class
41 3 67 unless (-e App::JobLog::Log::log())
67 2 3 if $ll->is_beginning
81 26 20 if ($ll->is_endpoint)
82 13 13 if $previous
83 17 9 if ($ll->is_beginning) { }
104 4 13 if $ll->is_note
116 1 8 if ($ll->is_malformed) { }
7 1 elsif ($ll->is_event) { }
124 6 1 if ($previous_event) { }
0 1 elsif ($ll->is_end) { }
125 1 5 if ('DateTime'->compare($previous_event->time, $ll->time) > 0) { }
1 4 elsif ($previous_event->is_end and $ll->is_end) { }
169 1877 38 if $self->[1]
175 71 40 if ($ll->is_endpoint)
176 34 37 if ($e) { }
198 271 0 if $ll->is_event
210 17 16 if $ll->is_event
218 2080 57 if $self->[2]
228 56 11 if ($ll->is_endpoint)
230 51 5 if $ll->is_beginning
233 6 51 unless @lines
235 5 46 if @lines
248 5 4 if $ll->is_note
256 6 13 if (ref $event) { }
257 0 6 if ($event->isa('DateTime'))
260 0 0 if (@$events) { }
272 0 19 unless $event
276 8 47 unless $event
283 38 23 if ($ll->is_beginning) { }
12 11 elsif ($ll->is_end) { }
304 1 960 unless $start_event and $end_event
307 2 958 unless $end_event->is_open or 'DateTime'->compare($start, $end_event->end) < 0
312 0 958 if 'DateTime'->compare($start_event->start, $end) > 0
316 952 6 $end_event->is_open ? :
320 6 952 if $c1 and $c2
321 6 946 if $c1
322 16 936 if $c2
325 6 946 if ($c1)
330 160 42 if ($ll->is_endpoint)
331 6 154 if ('DateTime'->compare($ll->time, $end) >= 0)
332 5 1 if $previous->is_open
335 145 9 if ($previous and $previous->is_open)
338 150 4 if ($ll->is_beginning)
348 16 930 if ($c2)
357 30 7 if ($ll->is_endpoint)
359 24 6 if ($ll->is_beginning)
361 10 14 if $previous
364 16 14 if ('DateTime'->compare($ll->time, $start) <= 0)
365 13 3 if $e
387 0 17 unless $start_time and $end_time
390 0 17 unless 'DateTime'->compare($start, $end_time) <= 0
394 0 17 if 'DateTime'->compare($start_time, $end) > 0
399 1 16 if $c1 and $c2
400 4 12 if $c1
401 6 10 if $c2
404 4 12 if ($c1)
409 143 37 if ($ll->is_event)
410 3 140 if ('DateTime'->compare($ll->time, $end) >= 0)
413 69 71 if $ll->is_note
420 6 6 if ($c2)
429 35 3 if ($ll->is_event)
431 2 33 if $c2 < 0
432 10 23 if $ll->is_note
434 4 29 unless $c2
444 0 6 unless defined $i
456 0 949 unless $start_event and $end_event
460 1 948 if 'DateTime'->compare($start_event->start, $e) == 0
464 0 948 if $end_event->start < $e
468 0 948 unless $start_event->start < $e
474 919 4148 if $bottom - $top + 1 <= 15
477 29 4119 if (defined $previous_index and $previous_index == $index)
487 4119 1637 if ($ll->is_beginning)
505 4119 0 if $do_next
520 5 3 if $bottom - $top + 1 <= 15
523 0 3 if (defined $previous_index and $previous_index == $index)
533 3 0 if ($ll->is_event)
568 7526 1869 if ($ll->is_endpoint)
569 5233 2293 if ($previous)
570 5233 0 if $previous->is_open
571 4846 387 if 'DateTime'->compare($start, $previous->end) < 0
574 6163 1363 if ($ll->is_beginning) { }
575 930 5233 if 'DateTime'->compare($ll->time, $end) >= 0
583 0 435 if $previous and $previous->is_open and 'DateTime'->compare($previous->start, $end) < 0
602 121 2 if ($ll->is_event)
603 6 115 if $ll->time > $end
604 8 107 if ($ll->is_note and $ll->time >= $start)
622 5782 1357 if ($ll->is_endpoint)
623 3950 1832 if $previous and $previous->is_open
624 934 4848 if ($ll->time > $e)
625 934 0 if $previous
629 3964 884 if ($ll->is_beginning)
648 32 1 if ($ll->is_event)
649 6 26 if $ll->time > $e
650 5 21 if ($ll->is_note)
664 3782 369 if ($delta > 30) { }
668 1312 2470 if ($fraction < 0.1) { }
603 1867 elsif ($fraction > 0.9) { }
686 0 195 @args == 1 ? :
689 194 1 if ($current->is_event)
691 189 5 if ($previous) { }
694 0 189 if $current->is_end and $previous->is_closed
696 0 188 if ($current->is_beginning and $current->time < $previous->start || $previous->is_closed && $current->time < $previous->end)
707 186 3 if $current->tags_unspecified
711 62 127 if (not $last_ts or _different_day($last_ts, $current->time))
718 189 0 if ($previous->is_open)
721 189 0 unless $duration->in_units('days')
735 193 1 if ($current->is_beginning) { }
1 0 elsif ($self->[2] and $self->[2]->is_open) { }
757 3 63 if (not $last_ts or _different_day($last_ts, $note->time))
779 0 1 if $io and $io->is_open
787 0 0 unless @lines
788 0 0 @lines == 1 ? :
0 0 @lines == 1 ? :
0 0 @lines == 1 ? :
802 0 0 unless $index =~ /^\d++$/u and ref $line eq 'App::JobLog::Log::Line'