diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2003-01-31 01:23:17 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2003-01-31 01:23:17 +0000 |
| commit | fccdd76453dcabe23fa4ed389cab7c10a6e980fc (patch) | |
| tree | 8537340a4572a78d5aa39da3e6981ac50fe79315 /perl-install/install_interactive.pm | |
| parent | 2a49a120fb9f493785c61ea0dd7abecea8eb3bbc (diff) | |
| download | drakx-backup-do-not-use-fccdd76453dcabe23fa4ed389cab7c10a6e980fc.tar drakx-backup-do-not-use-fccdd76453dcabe23fa4ed389cab7c10a6e980fc.tar.gz drakx-backup-do-not-use-fccdd76453dcabe23fa4ed389cab7c10a6e980fc.tar.bz2 drakx-backup-do-not-use-fccdd76453dcabe23fa4ed389cab7c10a6e980fc.tar.xz drakx-backup-do-not-use-fccdd76453dcabe23fa4ed389cab7c10a6e980fc.zip | |
small fixes
Diffstat (limited to 'perl-install/install_interactive.pm')
| -rw-r--r-- | perl-install/install_interactive.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/perl-install/install_interactive.pm b/perl-install/install_interactive.pm index 6861e021d..849f224ac 100644 --- a/perl-install/install_interactive.pm +++ b/perl-install/install_interactive.pm @@ -129,7 +129,7 @@ sub partitionWizardSolutions { } ]; } else { push @wizlog, N("There is no FAT partition to use as loopback (or not enough space left)") . - @fats ? "\nFAT partitions:" . join('', map { "\n $_->{device} $_->{free} (" . ($min_linux + $min_swap + $min_freewin) . ")" } @fats) : ''; + (@fats ? "\nFAT partitions:" . join('', map { "\n $_->{device} $_->{free} (" . ($min_linux + $min_swap + $min_freewin) . ")" } @fats) : ''); } @@ -178,7 +178,7 @@ When sure, press Ok.")) or return; $hd->adjustEnd($part); eval { - my $w = $o->wait_message(N("Resizing"), N("Resizing Windows partition")); + my $_w = $o->wait_message(N("Resizing"), N("Resizing Windows partition")); $resize_fat->resize($part->{size}); }; if (my $err = $@) { @@ -195,8 +195,7 @@ When sure, press Ok.")) or return; 1; } ]; } else { - push @wizlog, N("There is no FAT partition to resize (or not enough space left)") . - @ok_for_resize_fat ? "\nFAT partitions:" . join('', map { "\n $_->{device} $_->{free} (" . ($min_linux + $min_swap + $min_freewin) . ")" } @ok_for_resize_fat) : ''; + push @wizlog, N("There is no FAT partition to resize (or not enough space left)"); } if (@$fstab && @hds_rw) { |