Branch Coverage

blib/lib/Data/ICal/DateTime.pm
Criterion Covered Total %
branch 69 86 80.2


line true false branch
118 6 8 unless $set
122 6 2 unless defined $period
148 0 55 unless defined $uid
150 1 54 if ($_->recurrence_id) { }
160 3 1 unless $_->start == $e->recurrence_id
195 541 1271 if ($new)
204 1271 541 if $$dtstart[0]->parameters->{'TZID'}
230 609 1023 if ($new)
233 14 595 if ($all_day)
238 14 595 if $all_day
246 1291 173 if $$dtend[0]->parameters->{'TZID'}
247 284 1180 if $all_day
271 213 1995 unless ($dtend)
272 212 1 unless $new
280 41 1955 if (defined $new and $new != $cur)
282 39 2 if ($new == 0) { }
315 28 6 defined $end ? :
316 4 30 if (defined $new and $new != $cur)
318 2 2 if ($new) { }
348 0 394 if ($new)
374 0 392 if ($new)
462 784 0 unless $self->property($name)
480 0 786 if (@_)
498 769 17 unless $self->property($name)
524 0 451 if ($new)
544 55 744 if ($val)
669 16 248 if (not $e{'recur'} and $e{'span'}->intersects($span))
678 12 252 if ($e{'recur'} and $e{'recur'}->intersects($span))
686 1 39 if $e{'exrule'} and $e{'exrule'}->contains($dt)
687 0 39 if $e{'exdate'} and $e{'exdate'}->contains($dt)
692 38 1 if (defined $e{'duration'})
702 264 0 unless defined $period
717 523 2 if @_
732 0 24 if $event->floating
746 7 484 if $dt >= $event->end
802 0 392 if (defined $e{'period'})
803 0 0 if (defined $e{'start'} or defined $e{'end'})
814 0 392 unless (defined $e{'start'})
818 0 392 if (defined $e{'end'} and defined $e{'duration'})
828 154 238 if (defined $e{'duration'})
832 0 392 if (defined $e{'rdate'})
833 0 0 defined $e{'recur'} ? :
839 390 2 if $e{'end'}