From 8db31ddc772dc8620992e9c80e5cc4b855dccac9 Mon Sep 17 00:00:00 2001 From: Olivier Thauvin Date: Tue, 22 Aug 2006 13:11:54 +0000 Subject: - more doc --- lib/MDV/Distribconf.pm | 16 +++++++++++++++- 1 file changed, 15 insertions(+), 1 deletion(-) 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; -- cgit v1.2.1