diff options
-rw-r--r-- | modules/buildsystem/files/Mageia.pm | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/modules/buildsystem/files/Mageia.pm b/modules/buildsystem/files/Mageia.pm index 509efa7c..ce4ed478 100644 --- a/modules/buildsystem/files/Mageia.pm +++ b/modules/buildsystem/files/Mageia.pm @@ -176,6 +176,22 @@ sub get_distribution_paths { return $self->_get_distribution_paths($package, $target); } +=head2 get_distribution_roots() + +Returns distribution roots (ie install_root + target + arch) +(it returns a list in case of noarch) + +=cut + +sub get_distribution_roots { + my ($self, $package, $target) = @_; + croak "Not a class method" unless ref $self; + + map { + $self->_get_dir($self->{_install_root}, $_); + } $self->_get_distribution_paths($package, $target); +} + sub get_archive_path { my ($self, $package, $target, $user_context, $app_context) = @_; |