| line |
true |
false |
branch |
|
38
|
0 |
2 |
if $MSDOS::Descript::hide_descriptions |
|
50
|
0 |
2 |
if -d $$self{'file'} |
|
62
|
0 |
2 |
if $_[0]{'autoupdate'} |
|
70
|
0 |
0 |
$#_ > 0 ? : |
|
91
|
3 |
25 |
if ($#_ > 1) |
|
93
|
2 |
1 |
if (not defined $desc or $desc eq '') { } |
|
94
|
2 |
0 |
if defined delete($$self{'desc'}{$file}) |
|
97
|
1 |
0 |
if not defined $old or $old ne $desc |
|
113
|
1 |
0 |
if (defined $desc) |
|
125
|
2 |
0 |
unless $in |
|
130
|
2 |
0 |
if $in eq $$self{'file'} |
|
143
|
2 |
0 |
if (-r $in) |
|
144
|
0 |
2 |
unless open DESCRIPT, $in |
|
146
|
0 |
10 |
unless /^\"([^\"]+)\" (.+)$/ or /^([^ ]+) (.+)$/ |
|
163
|
0 |
1 |
unless $out |
|
167
|
1 |
0 |
if (keys %{$$self{'desc'};}) |
|
168
|
0 |
1 |
unless open DESCRIPT, ">$out" |
|
170
|
0 |
4 |
unless $desc |
|
171
|
1 |
3 |
if $file =~ /\s/ |
|
175
|
0 |
1 |
if $MSDOS::Descript::hide_descriptions |
|
177
|
0 |
1 |
if $out eq $$self{'file'} |
|
185
|
0 |
0 |
if $_[0]->changed |