Merge branch 'dl_vr_first', fixes #35

1 files changed, 11 insertions, 1 deletions

diff --git a/sboupgrade b/sboupgrade
index 12c086f..e33beca 100755
--- a/sboupgrade
+++ b/sboupgrade
@@ -194,7 +194,16 @@ sub process_sbos($) {
     exists $_[0] or script_error 'process_sbos requires an argument.';
     my $todo = shift;
     my %failures;
-    FIRST: for my $sbo (@$todo) {
+	my %symlinks;
+	for my $sbo (@$todo) {
+		$compat32 = $sbo =~ /-compat32$/ ? 1 : 0;
+		eval { $symlinks{$sbo} = check_distfiles(
+			LOCATION => $locations{$sbo}, COMPAT32 => $compat32
+		); };
+		$failures{$sbo} = $@ if $@;
+	}
+	return %failures if keys %failures > 0;
+    for my $sbo (@$todo) {
 		my $opts = 0;
 		$opts = $options{$sbo} if defined $options{$sbo};
 		my $cmds = $commands{$sbo} if defined $commands{$sbo};
@@ -210,6 +219,7 @@ sub process_sbos($) {
 		    JOBS    => $jobs,
 		    LOCATION  => $locations{$sbo},
 		    COMPAT32  => $compat32,
+			SYMLINKS  => $symlinks{$sbo},
 		); };
 		if ($@) {
 		    $failures{$sbo} = $@;