diff options
-rw-r--r-- | lib/Youri/Submit/Post/CleanRpmsrate.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/Youri/Submit/Post/CleanRpmsrate.pm b/lib/Youri/Submit/Post/CleanRpmsrate.pm index ee11553..2b75ce4 100644 --- a/lib/Youri/Submit/Post/CleanRpmsrate.pm +++ b/lib/Youri/Submit/Post/CleanRpmsrate.pm @@ -16,6 +16,9 @@ use strict; use Carp; use base qw/Youri::Submit::Post/; +#- inlined from MDK::Common::DataStructure +sub uniq { my %l; $l{$_} = 1 foreach @_; grep { delete $l{$_} } @_ } + sub _init { } @@ -23,7 +26,7 @@ sub run { my ($self, $repository, $target, $define) = @_; croak "Not a class method" unless ref $self; my $root = $repository->get_install_root(); - foreach my $arch (@{$repository->get_arch_changed($target)}, 'i586', 'x86_64') { + foreach my $arch (uniq(@{$repository->get_arch_changed($target)}, 'i586', 'x86_64')) { my $rpmsrate = "$root/$target/$arch/media/media_info/rpmsrate"; my @media = "$root/$target/$arch/media/main/release"; system("cp", "$rpmsrate-raw", "$rpmsrate-new"); |