--- builds_bin/linksource	2005/09/15 23:55:09	1.1
+++ builds_bin/linksource	2006/06/30 22:58:12	1.2
@@ -7,15 +7,16 @@ use File::Copy;
 
 my $rpm_flags =  RPM2->vsf_nodsa;
 my @repositories = qw( 
+        /mirrors/centos/4/fasttrack/SRPMS/
         /mirrors/centos/4/updates/SRPMS/
         /mirrors/centos/4/os/SRPMS/
-        /mirrors/centos/4/dag/SRPMS/
-        /mirrors/centos/4/atrpms/SRPMS/SRPMS.stable/
+        /mirrors/dag/source/
+        /mirrors/atrpms/src/el4-i386/atrpms/SRPMS.stable/
         /mirrors/centos/4/dries/SRPMS/
         /mirrors/fedora/updates/3/SRPMS/
         /mirrors/fedora/3/SRPMS/
-        /mirrors/mitel/devel/repo/SRPMS/
         /builds/rpms/SRPMS/
+        /mirrors/mitel/devel/repo/SRPMS/
         );
 
 opendir RPMS, "/builds/RPMS" or die "Couldn't opendir /builds/RPMS";
@@ -42,6 +43,7 @@ foreach my $rpm ( sort keys %rpms )
     my $src = $rpms{$rpm}->tag('SOURCERPM');
     push @sources, $src;
     push @sources, $src if ($src =~ s/\.2\.el4\.rf\./\.rf\./);
+    push @sources, $src if ($src =~ s/\.el4\.rf\./\.rf\./);
     push @sources, $src if ($src =~ s/\.rf\./\.dag\./);
 
     my $found = 0;
@@ -56,7 +58,7 @@ foreach my $rpm ( sort keys %rpms )
             {
                 my $fromfile = $repos{$source} . "/$source";
                 $fromfile =~ s#//#/#g;
-                `ln -s $fromfile /builds/SRPMS/`;
+                `cp -pl $fromfile /builds/SRPMS/`;
                 $found = 1;
                 last;
             }