| blib/lib/PostScript/Calendar.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 43 | 80 | 53.7 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 68 | 5 | 56 | 0 | not ref $color and $color =~ /^#((?:[0-9a-f]{3})+)$/i |
| 253 | 113 | 147 | 1273 | $d > 0 && $d <= $numDays |
| 257 | 42 | 0 | 0 | $condense and @grid == 6 |
| 457 | 34 | 0 | 0 | $special and $$events[1] |
| 534 | 4 | 1 | 0 | $metrics->width($_) > $width and s/-([^- \t]+-*)$/-/ || s/([ \t]+[^- \t]*-*)$// || s/(.)$// |
| 586 | 0 | 4 | 7 | $mini eq 'before' and not $$grid[0][1] |
| 4 | 0 | 0 | $mini eq 'after' and $$grid[-1][-2] | |
| 3 | 0 | 0 | $mini eq 'after' and not $$grid[-1][-2] | |
| 0 | 0 | 3 | $mini eq 'before' and $$grid[0][1] |
| line | l | !l | condition |
|---|---|---|---|
| 125 | 0 | 18 | $p{'days'} || [0..6] |
| 0 | 18 | $p{'title_font'} || 'Helvetica-iso' | |
| 0 | 18 | $p{'title_size'} || 14 | |
| 0 | 18 | $p{'label_font'} || $p{'title_font'} || 'Helvetica-iso' | |
| 0 | 18 | $p{'label_size'} || $p{'title_size'} || 14 | |
| 0 | 18 | $p{'date_font'} || 'Helvetica-Oblique-iso' | |
| 0 | 18 | $p{'date_size'} || $p{'title_size'} || 14 | |
| 0 | 18 | $p{'event_font'} || 'Helvetica-iso' | |
| 0 | 18 | $p{'event_size'} || 8 | |
| 0 | 18 | $p{'mini_font'} || 'Helvetica-iso' | |
| 0 | 18 | $p{'mini_size'} || 6 | |
| 177 | 0 | 18 | $p{'day_names'} || [map({Day_of_Week_to_Text($_ % 7 || 7);} @$days)] |
| 187 | 0 | 7 | $p{'paper'} || 'Letter' |
| 375 | 24 | 18 | $p{'dateShow'} || 'showRight' |
| 484 | 0 | 3 | $$events[3] || 0 |
| 677 | 0 | 4 | $$events[$dates[0]][3] || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 275 | 14 | 16 | 0 | $$self{'fontCache'}{$font}{$size} ||= $$self{'psFile'}->get_metrics($font, $size) |
| 534 | 1 | 0 | 0 | s/-([^- \t]+-*)$/-/ || s/([ \t]+[^- \t]*-*)$// || s/(.)$// |
| 586 | 1 | 0 | 11 | $$grid[-1][-1] or $mini eq 'before' and not $$grid[0][1] |
| 7 | 0 | 4 | $$grid[-1][-1] or $mini eq 'before' and not $$grid[0][1] or $mini eq 'after' and $$grid[-1][-2] | |
| 1 | 0 | 3 | $$grid[0][0] or $mini eq 'after' and not $$grid[-1][-2] | |
| 0 | 0 | 3 | $$grid[0][0] or $mini eq 'after' and not $$grid[-1][-2] or $mini eq 'before' and $$grid[0][1] | |
| 603 | 12 | 6 | 0 | $$self{'dayHeight'} || $dayHeight |