diff options
| author | Francois Pons <fpons@mandriva.com> | 2001-09-24 09:06:52 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2001-09-24 09:06:52 +0000 |
| commit | 09ee758cac28e5b6f3b8942426f1287e7eb717b8 (patch) | |
| tree | a4feec4abc56a7b172d3260d81d42701fb974bca | |
| parent | 3fe973db54e901674cb9a2523ff2be7ff561d2d3 (diff) | |
| download | drakx-09ee758cac28e5b6f3b8942426f1287e7eb717b8.tar drakx-09ee758cac28e5b6f3b8942426f1287e7eb717b8.tar.gz drakx-09ee758cac28e5b6f3b8942426f1287e7eb717b8.tar.bz2 drakx-09ee758cac28e5b6f3b8942426f1287e7eb717b8.tar.xz drakx-09ee758cac28e5b6f3b8942426f1287e7eb717b8.zip | |
sort mediums by number, in allMediums() else they will be in hash keys orders in
install_steps_interactive::chooseCD().
| -rw-r--r-- | perl-install/pkgs.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index f44fff788..3d37b0689 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -205,7 +205,7 @@ sub packagesToInstall { sub allMediums { my ($packages) = @_; - keys %{$packages->{mediums}}; + sort { $a <=> $b } keys %{$packages->{mediums}}; } sub mediumDescr { my ($packages, $medium) = @_; |