| line |
true |
false |
branch |
|
90
|
0 |
0 |
unless defined $$self{$name} |
|
95
|
0 |
0 |
if defined $widget |
|
102
|
0 |
0 |
unless ref $widget->ConfigSpecs |
|
104
|
0 |
0 |
if (defined $specs{-'variable'}) |
|
106
|
0 |
0 |
if (not defined $vref) { } |
|
117
|
0 |
0 |
if (defined $specs{-'textvariable'}) |
|
119
|
0 |
0 |
if defined $specs{-'text'} |
|
120
|
0 |
0 |
if (not defined $$widget{-'textvariable'}) { } |
|
127
|
0 |
0 |
if defined $text |
|
128
|
0 |
0 |
if ref $widget eq 'Tk::Entry' |
|
172
|
0 |
0 |
if $name eq 'DESTROY' |
|
178
|
0 |
0 |
if $name eq 'Scrolled' |
|
179
|
0 |
0 |
unless @opts % 2 |
|
184
|
0 |
0 |
unless $_ =~ /^-/ |
|
186
|
0 |
0 |
if $_ =~ /^-/ |
|
193
|
0 |
0 |
if (defined $Special{'onoff'}) |
|
195
|
0 |
0 |
unless defined $Tk{-'onvalue'} |
|
196
|
0 |
0 |
unless defined $Tk{-'offvalue'} |
|
197
|
0 |
0 |
if defined $off and not defined $Special{'default'} |
|
201
|
0 |
0 |
if defined $leadarg |
|
208
|
0 |
0 |
if ($reffer eq 'Tk::LabEntry' or $reffer eq 'Tk::BrowseEntry') |
|
210
|
0 |
0 |
if ref $w eq 'Tk::LabEntry' |
|
214
|
0 |
0 |
if defined $Special{'packOpts'} |
|
215
|
0 |
0 |
if (defined $packOpts and ref $packOpts eq 'ARRAY') |
|
220
|
0 |
0 |
if (defined $Special{'vfrom'}) { } |
|
222
|
0 |
0 |
if defined $fw |
|
223
|
0 |
0 |
unless defined $fw |
|
229
|
0 |
0 |
if defined $Special{'name'} |
|
250
|
0 |
0 |
unless defined $top |
|
252
|
0 |
0 |
if defined $top |
|
279
|
0 |
0 |
if ref $w eq 'Tk::Entry' |
|
293
|
0 |
0 |
unless defined $name |
|
295
|
0 |
0 |
unless (defined $w) |
|
300
|
0 |
0 |
if defined $vref |
|
301
|
0 |
0 |
unless (ref $w eq 'Tk::Radiobutton' or ref $w eq 'Tk::Checkbutton') |
|
303
|
0 |
0 |
if defined $vref |
|
344
|
0 |
0 |
if (ref $w eq 'Tk::Listbox') |
|
346
|
0 |
0 |
if defined $as_indices and $as_indices != 0 |
|
354
|
0 |
0 |
unless defined $vref |
|
355
|
0 |
0 |
defined $vref ? : |