summaryrefslogtreecommitdiffstats
path: root/lib/MDV
diff options
context:
space:
mode:
authorOlivier Thauvin <nanardon@mandriva.org>2005-10-09 22:12:33 +0000
committerOlivier Thauvin <nanardon@mandriva.org>2005-10-09 22:12:33 +0000
commit4215ddb5457f9e632bdb5e7b787251fb093a9cf2 (patch)
tree8a8936dd98746b1505355785284a54f661a5edf7 /lib/MDV
parent0609bac26404c93238819a01530b32d8834079b1 (diff)
downloadperl-MDV-Distribconf-4215ddb5457f9e632bdb5e7b787251fb093a9cf2.tar
perl-MDV-Distribconf-4215ddb5457f9e632bdb5e7b787251fb093a9cf2.tar.gz
perl-MDV-Distribconf-4215ddb5457f9e632bdb5e7b787251fb093a9cf2.tar.bz2
perl-MDV-Distribconf-4215ddb5457f9e632bdb5e7b787251fb093a9cf2.tar.xz
perl-MDV-Distribconf-4215ddb5457f9e632bdb5e7b787251fb093a9cf2.zip
- more tests
Diffstat (limited to 'lib/MDV')
-rw-r--r--lib/MDV/Distribconf.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/MDV/Distribconf.pm b/lib/MDV/Distribconf.pm
index c6873a8..8d099f4 100644
--- a/lib/MDV/Distribconf.pm
+++ b/lib/MDV/Distribconf.pm
@@ -354,7 +354,7 @@ of media, location of index files, and paths set in the configuration.
sub getpath {
my ($distrib, $media, $var) = @_;
-
+ $var ||= ""; # Avoid undef value
my $val = $distrib->getvalue($media, $var);
$var =~ /^(?:root|VERSION)$/ and return $val;
return ($val =~ m!/! ? "" : ($var eq 'path' ? $distrib->{mediadir} : $distrib->{infodir} ) . "/") . $val;