diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-03-22 23:18:25 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-03-22 23:18:25 +0000 |
commit | 9ee84a2c340af2d4b1912d7573c2223368a22903 (patch) | |
tree | 3d59260e22c2e03770f9a24370b11e9e350b18f5 /perl-install/install_steps_interactive.pm | |
parent | 5c1d5c819d907a1bb5e98477b9aeb7dc9e2fda9e (diff) | |
download | drakx-backup-do-not-use-9ee84a2c340af2d4b1912d7573c2223368a22903.tar drakx-backup-do-not-use-9ee84a2c340af2d4b1912d7573c2223368a22903.tar.gz drakx-backup-do-not-use-9ee84a2c340af2d4b1912d7573c2223368a22903.tar.bz2 drakx-backup-do-not-use-9ee84a2c340af2d4b1912d7573c2223368a22903.tar.xz drakx-backup-do-not-use-9ee84a2c340af2d4b1912d7573c2223368a22903.zip |
no_comment
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r-- | perl-install/install_steps_interactive.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 26781f254..e736afb74 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -213,7 +213,9 @@ sub choosePartitionsToFormat($$) { log::l("preparing to format $_->{mntpoint}") foreach grep { $_->{toFormat} } @l; my %label; - $label{$_} = (isSwap($_) ? type2name($_->{type}) : $_->{mntpoint}) . " ($_->{device})" foreach @l; + $label{$_} = sprintf("%s (%s)", + isSwap($_) ? type2name($_->{type}) : $_->{mntpoint}, + isLoopback($_) ? loopback::file($_) : $_->{device}) foreach @l; $o->ask_many_from_list_ref('', _("Choose the partitions you want to format"), [ map { $label{$_} } @l ], |