aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lib/Youri/Submit/Post/CleanRpmsrate.pm5
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");