| line |
true |
false |
branch |
|
70
|
11588 |
0 |
if (@_ == 1) { } |
|
|
0 |
0 |
elsif (@_ > 1) { } |
|
83
|
74077 |
0 |
if (@_ == 1) { } |
|
|
0 |
0 |
elsif (@_ > 1) { } |
|
115
|
0 |
12120 |
unless defined $item |
|
116
|
0 |
12120 |
if @_ |
|
117
|
12072 |
48 |
unless $self->alias->{$item} |
|
122
|
0 |
0 |
unless defined $item |
|
132
|
0 |
0 |
if @_ |
|
133
|
0 |
0 |
unless $self->_head_my |
|
139
|
0 |
307 |
if defined $mode |
|
140
|
0 |
307 |
unless $self->head_m |
|
145
|
0 |
307 |
@_ ? : |
|
153
|
307 |
0 |
if (@_) |
|
155
|
0 |
307 |
unless $month and defined $year |
|
156
|
0 |
307 |
if $self->_initialized |
|
162
|
0 |
307 |
unless $month <= 12 and $month >= 1 |
|
163
|
0 |
307 |
unless $year > 0 |
|
201
|
0 |
9351 |
if $skips->{$_} |
|
207
|
1291 |
8060 |
unless $dowc or $_ == $self->lastday |
|
214
|
0 |
307 |
if $self->head_week |
|
227
|
0 |
307 |
$self->head_week ? : |
|
240
|
307 |
0 |
if ($self->_head_my) { } |
|
241
|
307 |
0 |
if ($self->head_m and $self->head_y) { } |
|
|
0 |
0 |
elsif ($self->head_y) { } |
|
|
0 |
0 |
elsif ($self->head_m) { } |
|
268
|
307 |
0 |
if ($self->head_dow) { } |
|
276
|
0 |
307 |
if ($self->head_week) |
|
285
|
0 |
0 |
unless $self->item_aliased($ws) |
|
298
|
9351 |
1835 |
if $i = $self->item_at($r, $c) |
|
304
|
307 |
0 |
if ($self->enable_css) |
|
306
|
307 |
0 |
if $self->head_dow |
|
308
|
307 |
0 |
if $self->head_y |
|
310
|
307 |
0 |
if $self->head_m |
|
312
|
0 |
307 |
if $self->head_week |
|
316
|
0 |
307 |
if ($self->semantic_css) |
|
318
|
0 |
0 |
if ($today < 0) { } |
|
|
0 |
0 |
elsif ($today == 0) { } |
|
326
|
0 |
0 |
if ($d < $today) { } |
|
|
0 |
0 |
elsif ($d > $today) { } |
|
392
|
0 |
307 |
unless ($ct = $self->_caltool) |
|
439
|
0 |
0 |
unless $tool->can('week_of_year') |
|
444
|
0 |
0 |
if ($delta < 0) |
|
451
|
0 |
0 |
if ($delta > 0) |
|
458
|
0 |
0 |
$fweek > $lweek ? : |
|
461
|
0 |
0 |
if ($self->row_of($ft[0]) != 2) |
|
466
|
0 |
0 |
if ($self->row_of($lt[0]) != $self->last_row) |
|
471
|
0 |
0 |
if ($wnums[0] == 0) |
|
476
|
0 |
0 |
if ($wnums[-1] > $lweek) |
|
497
|
0 |
0 |
keys %items > 1 ? : |
|
527
|
0 |
0 |
keys %items > 1 ? : |
|
533
|
0 |
0 |
unless $day |
|
534
|
0 |
0 |
unless $self->_daycheck($day) |
|
541
|
0 |
0 |
wantarray ? : |
|
547
|
0 |
0 |
unless $self->head_week |
|
548
|
0 |
0 |
wantarray ? : |
|
556
|
0 |
0 |
wantarray ? : |
|
567
|
0 |
0 |
wantarray ? : |
|
574
|
0 |
0 |
wantarray ? : |
|
581
|
0 |
0 |
$self->head_week ? : |
|
599
|
0 |
0 |
if ($today < 0) { } |
|
|
0 |
0 |
elsif ($today == 0) { } |
|
611
|
0 |
0 |
if ($today < 0) { } |
|
|
0 |
0 |
elsif ($today == 0) { } |
|
625
|
0 |
3991 |
unless @_ |
|
638
|
0 |
0 |
unless $self->head_week |
|
641
|
0 |
0 |
if ++$rows{$r} > 1 |
|
672
|
0 |
0 |
unless defined $rfirst and defined $rlast |
|
675
|
0 |
0 |
if ++$seen{$col} > 1 |
|
686
|
0 |
0 |
unless defined $item1 and defined $item2 |
|
713
|
0 |
6447 |
if @_ and not defined $_[0] |
|
715
|
6447 |
0 |
ref $ref ? : |
|
716
|
6447 |
0 |
@pos ? : |
|
728
|
0 |
18561 |
unless defined $item |
|
730
|
12114 |
6447 |
if ($ref) |
|
731
|
0 |
12114 |
unless ref $ref |
|
740
|
0 |
23300 |
unless defined $refstring |
|
742
|
12114 |
11186 |
if (defined $item) |
|
761
|
0 |
307 |
unless @_ |
|
765
|
307 |
0 |
if $m and $m =~ /^\d+$/ |
|
767
|
307 |
0 |
if @_ == 1 |
|
776
|
614 |
0 |
@_ ? : |
|
780
|
0 |
614 |
if $m and $m =~ /^\d+$/ |
|
782
|
0 |
614 |
unless defined $m |
|
784
|
614 |
0 |
if @_ == 1 |
|
793
|
0 |
0 |
unless @_ |
|
797
|
0 |
0 |
if ($d =~ /^\d+$/) |
|
801
|
0 |
0 |
if @_ == 1 |
|
811
|
0 |
0 |
unless @_ |
|
815
|
0 |
0 |
if ($d =~ /^\d+$/) |
|
819
|
0 |
0 |
unless defined $d |
|
821
|
0 |
0 |
if @_ == 1 |
|
832
|
0 |
0 |
unless $name |
|
833
|
0 |
0 |
if $name =~ /^\d+$/ |
|
840
|
0 |
0 |
unless $item |
|
843
|
0 |
0 |
if $item =~ /^\d{1,2}$/ |
|
858
|
1229 |
0 |
if ('HTML::CalendarMonth'->_is_calmonth_attr($_)) { } |
|
874
|
0 |
309 |
unless ($month and $year) |
|
885
|
467 |
144 |
if defined $attrs{$k} |
|
888
|
0 |
309 |
unless my $loc = 'HTML::CalendarMonth::Locale'->new('id', $self->locale, 'full_days', $self->full_days, 'full_months', $self->full_months) |
|
905
|
7 |
300 |
unless defined $attrs{'week_begin'} |
|
908
|
0 |
307 |
defined $attrs{'today'} ? : |
|
912
|
6 |
301 |
if ($self->full_days < 0) |
|
919
|
0 |
307 |
if ($self->full_months < 0) |
|
926
|
6 |
301 |
if keys %$alias |