| blib/lib/MDV/Distribconf.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 32 | 48 | 66.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 285 | 1 | 1 | 1 | $spec and $spec =~ /mandrake/i |
| 383 | 23 | 0 | 22 | -f $mediacfg and -r _ |
| 23 | 0 | 22 | -f $mediacfg and -r _ and $distrib->{'cfg'} = 'Config::IniFiles'->new('-file', $mediacfg, '-default', 'media_info', '-allowcontinue', 1) | |
| 459 | 0 | 2 | 0 | $default =~ /.*\.cz$/ and not $distrib->getvalue(undef, 'synthesis-suffix') eq '.cz' |
| line | l | !l | condition |
|---|---|---|---|
| 287 | 2 | 1 | $spec->{$_} || '' |
| 408 | 3978 | 268 | $media ||= 'media_info' |
| 417 | 47 | 2 | $media ||= 'media_info' |
| 418 | 2 | 47 | $level ||= 0 |
| 446 | 632 | 3089 | $media ||= 'media_info' |
| 479 | 0 | 0 | $distrib->getvalue(undef, $_) || '' |
| 483 | 717 | 580 | $distrib->{'cfg'}->val('media_info', 'mediacfg_version') || 1 |
| 524 | 523 | 0 | $var ||= '' |
| 580 | 22 | 0 | $_[1] || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 220 | 21 | 23 | 0 | $distrib->parse_mediacfg or $distrib->parse_hdlists |
| 314 | 0 | 23 | 0 | $hdlists ||= "$distrib->{'root'}/$distrib->{'infodir'}/hdlists" |
| 355 | 0 | 0 | 0 | $fversion ||= $distrib->getfullpath(undef, 'VERSION') |
| 381 | 1 | 44 | 0 | $mediacfg ||= "$distrib->{'root'}/$distrib->{'infodir'}/media.cfg" |
| 409 | 3421 | 825 | 0 | $media eq 'media_info' || $distrib->{'cfg'}->SectionExists($media) |
| 610 | 4 | 34 | 167 | $distrib->getvalue($media, 'cdmode') or $distrib->{'type'} eq 'mandrake' |