aboutsummaryrefslogtreecommitdiffstats
path: root/modules/buildsystem
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@gmail.com>2016-12-05 08:42:57 +0000
committerPascal Terjan <pterjan@gmail.com>2016-12-05 08:42:57 +0000
commita07d1a9c20d946899fe316aa3adcad78495fa119 (patch)
tree609033d40b091ee7014fca5335d2a6fcbc7c4d62 /modules/buildsystem
parent049110a920072d3d3856572390f4bb6ac2ea8b6f (diff)
downloadpuppet-a07d1a9c20d946899fe316aa3adcad78495fa119.tar
puppet-a07d1a9c20d946899fe316aa3adcad78495fa119.tar.gz
puppet-a07d1a9c20d946899fe316aa3adcad78495fa119.tar.bz2
puppet-a07d1a9c20d946899fe316aa3adcad78495fa119.tar.xz
puppet-a07d1a9c20d946899fe316aa3adcad78495fa119.zip
Kill get_revisions, the one in the base class is better
Diffstat (limited to 'modules/buildsystem')
-rw-r--r--modules/buildsystem/files/Mageia.pm29
1 files changed, 0 insertions, 29 deletions
diff --git a/modules/buildsystem/files/Mageia.pm b/modules/buildsystem/files/Mageia.pm
index 539961ab..2f39a1ab 100644
--- a/modules/buildsystem/files/Mageia.pm
+++ b/modules/buildsystem/files/Mageia.pm
@@ -498,35 +498,6 @@ sub get_svn_url {
$self->{_svn}
}
-sub get_revisions {
- my ($self, $package, $target, $user_context, $app_context, $filter) = @_;
- croak "Not a class method" unless ref $self;
- print "Looking for package $package revisions for $target\n" if $self->{_verbose} > 0;
-
- my $arch = $app_context->{arch} || $user_context->{arch} || $package->get_arch();
- my $media_arch = $arch eq 'noarch' ? $self->{_noarch} : $arch;
- my $path = $arch eq 'src' ? "$target/SRPMS/" : "$target/$media_arch/media";
- my $media = $self->_get_section($package, $target, $user_context, $app_context);
- my $name = $package->get_name();
- my @packages = map { $self->get_package_class()->new(file => $_) }
- $self->get_files(
- $self->{_install_root},
- "$path/$media",
- $self->get_package_class()->get_pattern(
- $name,
- undef,
- undef,
- $package->get_arch(),
- )
- );
-
- @packages = grep { $filter->($_) } @packages if $filter;
-
- return
- sort { $b->compare($a) } # sort by revision order
- @packages;
-}
-
sub reject {
my ($self, $package, $target, $user_context, $app_context) = @_;
croak "Not a class method" unless ref $self;