diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-27 22:16:23 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-27 22:16:23 +0000 |
| commit | 1ebf6242bfbbe356cb8cb0e61395ba675afc0e75 (patch) | |
| tree | f43d69dc38d85f727babd9ca7ec6bf52979aa5c8 /perl-install/install_any.pm | |
| parent | 1eb2d3f0fd5aedfa3780e5439366bc1e6e331e88 (diff) | |
| download | drakx-backup-do-not-use-1ebf6242bfbbe356cb8cb0e61395ba675afc0e75.tar drakx-backup-do-not-use-1ebf6242bfbbe356cb8cb0e61395ba675afc0e75.tar.gz drakx-backup-do-not-use-1ebf6242bfbbe356cb8cb0e61395ba675afc0e75.tar.bz2 drakx-backup-do-not-use-1ebf6242bfbbe356cb8cb0e61395ba675afc0e75.tar.xz drakx-backup-do-not-use-1ebf6242bfbbe356cb8cb0e61395ba675afc0e75.zip | |
no_comment
Diffstat (limited to 'perl-install/install_any.pm')
| -rw-r--r-- | perl-install/install_any.pm | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 94922ba1a..4d9a1e3ce 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -330,12 +330,17 @@ _("DiskDrake failed to read correctly the partition table. Continue at your own risk!")) if !$ok2 && $ok && !$o->{partitioning}{readonly}; my @win = grep { isFat($_) && isFat({ type => fsedit::typeOfPart($_->{device}) }) } @{$o->{fstab}}; - my @nt = grep { isNT($_) && isNT( { type => fsedit::typeOfPart($_->{device}) }) } @{$o->{fstab}}; +# my @nt = grep { isNT($_) && isNT( { type => fsedit::typeOfPart($_->{device}) }) } @{$o->{fstab}}; log::l("win parts: ", join ",", map { $_->{device} } @win) if @win; - log::l("nt parts: ", join ",", map { $_->{device} } @nt) if @nt; - $_->{mntpoint} = @win == 1 ? "/mnt/windows" : "/mnt/win_$_->{device_windobe}" foreach @win; - $_->{mntpoint} = @nt == 1 ? "/mnt/nt" : "/mnt/nt_$_->{device_windobe}" foreach @nt; - +# log::l("nt parts: ", join ",", map { $_->{device} } @nt) if @nt; + if (@win == 1) { + $win[0]{mntpoint} = "/mnt/windows"; + } else { + my %w; foreach (@win) { + my $v = $w{$_->{device_windobe}}++; + $_->{mntpoint} = "/mnt/win_$_->{device_windobe}" . ($v ? $v+1 : ''); + } + } $ok2; } |