Branch Coverage

blib/lib/Data/ICal/DateTime.pm
Criterion Covered Total %
branch 71 88 80.6


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)
502 17 1 unless $start->time_zone->is_floating
525 0 451 if ($new)
545 55 744 if ($val)
670 16 248 if (not $e{'recur'} and $e{'span'}->intersects($span))
679 12 252 if ($e{'recur'} and $e{'recur'}->intersects($span))
687 1 39 if $e{'exrule'} and $e{'exrule'}->contains($dt)
688 0 39 if $e{'exdate'} and $e{'exdate'}->contains($dt)
693 38 1 if (defined $e{'duration'})
703 264 0 unless defined $period
718 523 2 if @_
733 0 24 if $event->floating
747 7 484 if $dt >= $event->end
803 0 392 if (defined $e{'period'})
804 0 0 if (defined $e{'start'} or defined $e{'end'})
815 0 392 unless (defined $e{'start'})
819 0 392 if (defined $e{'end'} and defined $e{'duration'})
829 154 238 if (defined $e{'duration'})
833 0 392 if (defined $e{'rdate'})
834 0 0 defined $e{'recur'} ? :
840 390 2 if $e{'end'}