diff options
author | Pascal Terjan <pterjan@mandriva.org> | 2010-02-05 13:29:12 +0000 |
---|---|---|
committer | Pascal Terjan <pterjan@mandriva.org> | 2010-02-05 13:29:12 +0000 |
commit | 0f58e6576e982f11a429fc6b8b5110c7c0a7e2f8 (patch) | |
tree | 8bd9cd4c0b66cbb1946ba4c9377ded81ce5b40ab /perl-install | |
parent | c7bae412b06c9c9b6b9a66395720088128a61154 (diff) | |
download | drakx-0f58e6576e982f11a429fc6b8b5110c7c0a7e2f8.tar drakx-0f58e6576e982f11a429fc6b8b5110c7c0a7e2f8.tar.gz drakx-0f58e6576e982f11a429fc6b8b5110c7c0a7e2f8.tar.bz2 drakx-0f58e6576e982f11a429fc6b8b5110c7c0a7e2f8.tar.xz drakx-0f58e6576e982f11a429fc6b8b5110c7c0a7e2f8.zip |
release 12.77.5 (ter)
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/fs/partitioning_wizard.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm index d95f0a63b..666b66092 100644 --- a/perl-install/fs/partitioning_wizard.pm +++ b/perl-install/fs/partitioning_wizard.pm @@ -511,7 +511,8 @@ sub main { my $combobox = Gtk2::ComboBox->new_text; foreach (@kinds) { - my $info = $_->{val}{info} || $_->{val}{name}; + my $info = $_->{val}{info} || $_->{val}{device}; + $info =~ s|^(?:.*/)?(.{16}).*|$1|; $info .= " (" . formatXiB($_->{val}{totalsectors}, 512) . ")" if $_->{val}{totalsectors}; $combobox->append_text($info); } |