diff options
author | Olivier Thauvin <nanardon@mandriva.org> | 2006-08-22 13:11:54 +0000 |
---|---|---|
committer | Olivier Thauvin <nanardon@mandriva.org> | 2006-08-22 13:11:54 +0000 |
commit | 8db31ddc772dc8620992e9c80e5cc4b855dccac9 (patch) | |
tree | eba8fb95174b814f762d1a3f32e43e30c03fbc48 /lib/MDV | |
parent | 09951ebbf3f2823e26511b5828a9630f941813fe (diff) | |
download | perl-MDV-Distribconf-8db31ddc772dc8620992e9c80e5cc4b855dccac9.tar perl-MDV-Distribconf-8db31ddc772dc8620992e9c80e5cc4b855dccac9.tar.gz perl-MDV-Distribconf-8db31ddc772dc8620992e9c80e5cc4b855dccac9.tar.bz2 perl-MDV-Distribconf-8db31ddc772dc8620992e9c80e5cc4b855dccac9.tar.xz perl-MDV-Distribconf-8db31ddc772dc8620992e9c80e5cc4b855dccac9.zip |
- more doc3.03
Diffstat (limited to 'lib/MDV')
-rw-r--r-- | lib/MDV/Distribconf.pm | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/lib/MDV/Distribconf.pm b/lib/MDV/Distribconf.pm index 6eb5fb5..52fe2d3 100644 --- a/lib/MDV/Distribconf.pm +++ b/lib/MDV/Distribconf.pm @@ -2,7 +2,7 @@ package MDV::Distribconf; # $Id$ -our $VERSION = '3.02'; +our $VERSION = '3.03'; =head1 NAME @@ -473,6 +473,14 @@ sub getpath { } } +=head2 $distrib->getmediapath($media, $var) + +This function does the same than getpath except it return the path proper +to the media for files having doble location (index for example). + +=cut + + sub getmediapath { my ($distrib, $media, $var) = @_; my %files = ( @@ -500,6 +508,12 @@ sub getfullpath { my $path = $distrib->getpath(@_) or return; return $distrib->getpath(undef, 'root') . '/' . $path; } +=head2 $distrib->getfullmediapath($media, $var) + +This function does the same than getpath except it return the path proper +to the media for files having doble location (index for example). + +=cut sub getfullmediapath { my $distrib = shift; |