diff options
| author | Francois Pons <fpons@mandriva.com> | 2001-08-24 12:44:56 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2001-08-24 12:44:56 +0000 |
| commit | afd8092ca637049090126f913c1ef20e595ebcc5 (patch) | |
| tree | 348133983026757c02dcb1c0bba1ae4e77667142 /perl-install | |
| parent | 12646c6a527a5499747f5d89bbfecc9b74f296b6 (diff) | |
| download | drakx-afd8092ca637049090126f913c1ef20e595ebcc5.tar drakx-afd8092ca637049090126f913c1ef20e595ebcc5.tar.gz drakx-afd8092ca637049090126f913c1ef20e595ebcc5.tar.bz2 drakx-afd8092ca637049090126f913c1ef20e595ebcc5.tar.xz drakx-afd8092ca637049090126f913c1ef20e595ebcc5.zip | |
fixed possible bug (not sorted partition when calling mount_part).
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_steps.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 49e10280f..7a87a3f01 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -166,7 +166,8 @@ sub doPartitionDisksAfter { if ($o->{partitioning}{use_existing_root}) { #- ensure those partitions are mounted so that they are not proposed in choosePartitionsToFormat - fs::mount_part($_, $o->{prefix}) foreach grep { $_->{mntpoint} && maybeFormatted($_) } @{$o->{fstab}}; + fs::mount_part($_, $o->{prefix}) foreach (sort { $a->{mntpoint} cmp $b->{mntpoint} } + grep { $_->{mntpoint} && maybeFormatted($_) } @{$o->{fstab}}); } cat_("/proc/mounts") =~ m|(\S+)\s+/tmp/image nfs| && |