1 files changed, 7 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index c18755d81..f3b1c34cc 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -240,8 +240,14 @@ sub packagesToInstall {
 
 sub allMediums {
     my ($packages) = @_;
-    sort { $a <=> $b } keys %{$packages->{mediums}};
+    sort {
+	#- put supplementary media at the end
+	my @x = ($a, $b);
+	foreach (@x) { /(\d+)s/ and $_ = 100 + $1 }
+	$x[0] <=> $x[1];
+    } keys %{$packages->{mediums}};
 }
+
 sub mediumDescr {
     my ($packages, $medium_name) = @_;
     $packages->{mediums}{$medium_name}{descr};