Branch Coverage

blib/lib/PostScript/Calendar.pm
Criterion Covered Total %
branch 78 112 69.6


line true false branch
57 414 573 if defined $_
68 0 61 if (not ref $color and $color =~ /^#((?:[0-9a-f]{3})+)$/i)
90 138 6 defined $_[0] ? :
180 0 18 unless (length $$self{'title'})
186 7 11 unless ($$self{'psFile'})
206 702 90 unless $k =~ /Font$/
207 90 0 $v =~ /^(.+)-iso$/ ? :
212 3 15 if $p{'shade_days_of_week'}
249 3 39 if $leftDate + $$offsets[-1] < 1
253 1273 260 $d > 0 && $d <= $numDays ? :
257 0 42 if ($condense and @grid == 6)
258 0 0 if ($grid[0][-2]) { }
296 7 20 if defined $color
305 4 5 ref $_[0] ? :
319 4 26 if %dict
333 0 3 if ref $_[0]
341 24 67 if $shade[$dow]
345 3 0 if @dates
356 42 0 if length $p{'title'}
373 18 24 if $p{'dateFont'}
383 236 1297 unless $day
385 24 1273 if (ref $day) { }
386 24 0 unless $$day[0] eq 'split'
415 24 0 $cols > 1 ? :
452 28 6 if $$events[2]
457 0 34 if ($special and $$events[1])
458 0 0 $dict ? :
462 4 30 if ($dict)
472 32 2 if ($$events[1])
481 3 31 if ($$events[0])
493 4 30 if $dict
511 3 0 if ($y > $dateBottom)
521 0 4 if $y < $dateBottom
523 0 4 if ($y < $eventSize)
541 1 3 if (length $next)
564 0 18 if $landscape
582 12 6 if ($mini)
584 0 12 if @$grid == 4
586 8 4 if ($$grid[-1][-1] or $mini eq 'before' and not $$grid[0][1] or $mini eq 'after' and $$grid[-1][-2]) { }
4 0 elsif ($$grid[0][0] or $mini eq 'after' and not $$grid[-1][-2] or $mini eq 'before' and $$grid[0][1]) { }
603 12 6 if ($dayHeight > ($$self{'dayHeight'} || $dayHeight))
634 7 11 unless ($ps->has_procset('PostScript_Calendar'))
673 1 17 if ($$self{'phases'})
677 4 0 if ($margin > ($$events[$dates[0]][3] || 0))
690 1 0 unless ($ps->has_procset('PostScript_Calendar_Moon'))
749 84 567 unless $day
751 24 543 if (ref $day) { }
752 0 24 if ($$day[0] eq 'split') { }
24 0 elsif ($$day[0] eq 'calendar') { }
754 0 0 if $$events[$$day[1]]
757 0 0 if $$events[$$day[2]]
768 34 509 if $$events[$day]
793 18 0 if ($$self{'grid'})
806 18 0 if ($$self{'border'}) { }
828 0 0 unless $$self{'generated'}
841 0 0 unless $$self{'generated'}