--- 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;
 }