--- builds_bin/update_repos 2007/06/03 04:13:57 1.11 +++ builds_bin/update_repos 2007/06/04 16:39:15 1.13 @@ -43,6 +43,7 @@ my @srcrepos = ( "/mirrors/centos/$centosrel/extras/SRPMS", "/mirrors/rpmforge/dag/source", "/mirrors/atrpms/src/el$centosrel-$arch/atrpms/stable", + "/mirrors/atrpms/src/el$centosrel-$arch/atrpms/testing", "/mirrors/fedora/epel/$centosrel/SRPMS", "/mirrors/fedora/core/updates/$fedorarel/SRPMS", "/mirrors/fedora/core/$fedorarel/source/SRPMS", @@ -200,14 +201,14 @@ foreach my $repo ( keys %srpms ) { print "\n"; foreach my $repo ( sort keys %copy ) { - foreach my $rpm ( @{$copy{$repo}} ) { + foreach my $rpm ( keys %{{ map { $_ => 1 } @{$copy{$repo}} }} ) { print "copying $rpm to $repo/\n"; system(qw(cp --preserve=timestamps), $rpm, "$repo/"); } } print "\n"; -foreach my $rpm ( @remove, map { $_->{rpm}->filename } grep { $_->{repo} eq 'deleted' } @rpms ) { +foreach my $rpm ( keys %{{ map { $_ => 1 } (@remove, map { $_->{rpm}->filename } grep { $_->{repo} eq 'deleted' } @rpms) }} ) { print "removing $rpm\n"; unlink $rpm; }