Branch Coverage

blib/lib/Tk/Chart.pm
Criterion Covered Total %
branch 0 186 0.0


line true false branch
291 0 0 if (defined $data and not _isainteger($data))
298 0 0 if (defined $xvaluesregex and ref $xvaluesregex ne 'Regexp')
307 0 0 if (defined $gradient and ref $gradient ne 'HASH')
314 0 0 if (defined $colors and ref $colors ne 'ARRAY')
322 0 0 if (defined $markers and ref $markers ne 'ARRAY')
329 0 0 if (defined $type_mixed and ref $type_mixed ne 'ARRAY')
338 0 0 if (my $xtickheight = $cw->cget('-xtickheight'))
343 0 0 if (my $smoothline = $cw->cget('-smoothline'))
347 0 0 if (my $xvaluespace = $cw->cget('-xvaluespace'))
351 0 0 if (my $noaxis = $cw->cget('-noaxis') and $cw->cget('-noaxis') == 1)
358 0 0 if (my $title = $cw->cget('-title')) { }
359 0 0 if (my $titleheight = $cw->cget('-titleheight'))
367 0 0 if (my $xlabel = $cw->cget('-xlabel')) { }
368 0 0 if (my $xlabelheight = $cw->cget('-xlabelheight'))
376 0 0 if (my $ylabel = $cw->cget('-ylabel')) { }
377 0 0 if (my $ylabel_width = $cw->cget('-ylabelWidth'))
385 0 0 if (my $ytickwidth = $cw->cget('-ytickwidth'))
389 0 0 if (my $valuescolor = $cw->cget('-valuescolor'))
394 0 0 if (my $textcolor = $cw->cget('-textcolor')) { }
0 0 elsif (my $labelscolor = $cw->cget('-labelscolor')) { }
404 0 0 if (my $textfont = $cw->cget('-textfont'))
409 0 0 if (my $startangle = $cw->cget('-startangle'))
410 0 0 if ($startangle < $MIN_ANGLE or $startangle > $MAX_ANGLE)
421 0 0 if (my $borderwidth = $cw->cget('-borderwidth'))
428 0 0 if (defined $yminvalue and not _isanumber($yminvalue))
433 0 0 if (defined $ymaxvalue and not _isanumber($ymaxvalue))
438 0 0 if (defined $yminvalue and defined $ymaxvalue)
439 0 0 if ($ymaxvalue <= $yminvalue)
452 0 0 unless (defined $ref_legend)
460 0 0 if ($size_legend != $size_data)
471 0 0 unless (defined $zoomx and _isanumber($zoomx) and $zoomx > 0 or defined $zoomy and _isanumber($zoomy) and $zoomy > 0)
487 0 0 if (defined $zoomx)
488 0 0 if (defined $zoomy)
489 0 0 if (defined $zoomx)
490 0 0 if (defined $zoomy)
499 0 0 if ($cw->{'RefChart'}{'Balloon'}{'Obj'} and $cw->Tk::Exists->{'RefChart'}{'Balloon'}{'Obj'})
514 0 0 if (defined $croak and $croak == 1) { }
518 0 0 if defined $verbose and $verbose == 1
541 0 0 unless ($marker_type{$number})
564 0 0 if ($ref_coord{'type'} eq 'circle' or $ref_coord{'type'} eq 'square') { }
0 0 elsif ($ref_coord{'type'} eq 'horizontal cross') { }
0 0 elsif ($ref_coord{'type'} eq 'diagonal cross') { }
0 0 elsif ($ref_coord{'type'} eq 'diamond') { }
0 0 elsif ($ref_coord{'type'} eq 'vertical line') { }
0 0 elsif ($ref_coord{'type'} eq 'horizontal line') { }
570 0 0 if ($ref_coord{'type'} eq 'circle') { }
651 0 0 unless (defined $ref_data_to_display and defined $ref_data_to_display->[$line_number])
656 0 0 if (defined $font)
657 0 0 if (defined $color)
663 0 0 if (defined $value)
673 0 0 unless defined $ref_points->[$indice_point]
686 0 0 if ($cw->cget('-boxaxis') == 0)
743 0 0 if (defined $longticks and $longticks == 1 or defined $xlongticks and $xlongticks == 1)
786 0 0 if (defined $longticks and $longticks == 1 or defined $ylongticks and $ylongticks == 1)
831 0 0 if $value == 0
853 0 0 unless ($cw->{'RefChart'}{'Data'}{'MinYValue'} == 0 or defined $yminvalue and $yminvalue > 0 or $cw->{'RefChart'}{'Data'}{'MinYValue'} > 0)
888 0 0 if (not defined $longticks or $longticks != 1)
913 0 0 unless ($title)
933 0 0 if ($titleposition eq 'left') { }
0 0 elsif ($titleposition eq 'right') { }
954 0 0 if ($anchor eq 'left' and $anchor eq 'right')
963 0 0 if ($cw->{'RefChart'}{'Title'}{'Ctitrey'} < $cw->{'RefChart'}{'Canvas'}{'HeightEmptySpace'})
999 0 0 unless (defined $xlabel)
1032 0 0 if ($cw->{'RefChart'}{'Axis'}{'Xaxis'}{'CxlabelY'} < $before_xlabel_y)
1066 0 0 unless (defined $ylabel)
1102 0 0 if (defined $cumulatepercent and $cumulatepercent == 1)
1114 0 0 if (defined $yminvalue and defined $ymaxvalue)
1115 0 0 unless ($ymaxvalue >= $cw->{'RefChart'}{'Data'}{'MaxYValue'} and $yminvalue <= $cw->{'RefChart'}{'Data'}{'MinYValue'} or defined $interval and $interval == 1)
1127 0 0 if (defined $cumulate and $cumulate == 1 and $cw->{'RefChart'}{'Data'}{'MinYValue'} > 0)
1131 0 0 unless (defined $interval and $interval == 1)
1132 0 0 if ($cw->{'RefChart'}{'Data'}{'MinYValue'} > 0)
1139 0 0 if (defined $yminvalue and $yminvalue != 0)
1142 0 0 if (defined $ymaxvalue and $ymaxvalue != 0)
1153 0 0 unless (defined $cw->{'RefChart'}{'Data'}{'PlotDefined'})
1168 0 0 if ($cw->class eq 'Pie')
1174 0 0 if ($cw->{'RefChart'}{'Data'}{'RefAllData'})
1188 0 0 if ($cw->class eq 'Lines') { }
1189 0 0 if ($cw->cget('-pointline') == 1) { }
1201 0 0 if ($cw->cget('-noaxis') != 1)
1206 0 0 if ($cw->{'RefChart'}{'Legend'}{'NbrLegend'} > 0)
1212 0 0 if ($cw->{'RefChart'}{'Data'}{'MaxYValue'} < 0)
1218 0 0 if ($cw->cget('-noaxis') == 1)
1223 0 0 if ($cw->cget('-zeroaxisonly') == 1 and $cw->{'RefChart'}{'Data'}{'MaxYValue'} > 0 and $cw->{'RefChart'}{'Data'}{'MinYValue'} < 0)
1229 0 0 if ($cw->cget('-zeroaxis') == 1)
1234 0 0 if ($cw->cget('-xvalueview') == 0)
1237 0 0 if ($cw->cget('-yvalueview') == 0)
1243 0 0 if (defined $alltickview) { }
1244 0 0 if ($alltickview == 0) { }
1253 0 0 if ($cw->cget('-xtickview') == 0)
1256 0 0 if ($cw->cget('-ytickview') == 0)
1262 0 0 if ($cw->{'RefChart'}{'Legend'}{'box'} == 0)
1266 0 0 if ($cw->class eq 'Mixed')
1277 0 0 if (defined $showvalues and $showvalues == 1)