diff options
author | Olivier Thauvin <nanardon@mandriva.org> | 2006-09-03 04:44:10 +0000 |
---|---|---|
committer | Olivier Thauvin <nanardon@mandriva.org> | 2006-09-03 04:44:10 +0000 |
commit | a102276c09d6a32033c480529c475f06248aa510 (patch) | |
tree | d9389b0b56b98db137b7ef30d7502bf290813098 | |
parent | 375b524b3f466fb8cbd26f81007528b75283cc7c (diff) | |
download | perl-MDV-Distribconf-a102276c09d6a32033c480529c475f06248aa510.tar perl-MDV-Distribconf-a102276c09d6a32033c480529c475f06248aa510.tar.gz perl-MDV-Distribconf-a102276c09d6a32033c480529c475f06248aa510.tar.bz2 perl-MDV-Distribconf-a102276c09d6a32033c480529c475f06248aa510.tar.xz perl-MDV-Distribconf-a102276c09d6a32033c480529c475f06248aa510.zip |
- fix getfullpath root
-rw-r--r-- | lib/MDV/Distribconf.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/MDV/Distribconf.pm b/lib/MDV/Distribconf.pm index ea77392..0eb5529 100644 --- a/lib/MDV/Distribconf.pm +++ b/lib/MDV/Distribconf.pm @@ -511,6 +511,7 @@ prefixed by the 'root' path. This is a shortcut for: sub getfullpath { my $distrib = shift; my $path = $distrib->getpath(@_) or return; + return $distrib->getpath(undef, 'root') if (($_[1] || '') eq 'root'); return $distrib->getpath(undef, 'root') . '/' . $path; } |