summaryrefslogtreecommitdiffstats
path: root/perl-install/diskdrake
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mandriva.org>2009-02-16 13:06:36 +0000
committerPascal Terjan <pterjan@mandriva.org>2009-02-16 13:06:36 +0000
commit5470576f181cca9d37bd314028d90cb30b040589 (patch)
tree74eab94934355eab73681466e7a772d1dde535b2 /perl-install/diskdrake
parent43234ed0a9f1736dfd9e6932548d1278acf08860 (diff)
downloaddrakx-5470576f181cca9d37bd314028d90cb30b040589.tar
drakx-5470576f181cca9d37bd314028d90cb30b040589.tar.gz
drakx-5470576f181cca9d37bd314028d90cb30b040589.tar.bz2
drakx-5470576f181cca9d37bd314028d90cb30b040589.tar.xz
drakx-5470576f181cca9d37bd314028d90cb30b040589.zip
diskdrake: limit partition type list to 2 colmuns instead of 4
Diffstat (limited to 'perl-install/diskdrake')
-rw-r--r--perl-install/diskdrake/interactive.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index 49cd00cb1..c86de51d3 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -485,7 +485,7 @@ sub Create {
{ label => N("Size in MB: "), val => \$mb_size, min => to_Mb(min_partition_size($hd)), max => to_Mb($def_size),
type => 'range', SpinButton => $::expert, changed => sub { $part->{start} = min($part->{start}, $max - $mb_size * 2048) } },
{ label => N("Filesystem type: "), val => \$type_name, list => [ fs::type::type_names($::expert, $hd) ],
- sort => 0, if_($::expert, gtk => { wrap_width => 4 }, do_not_ellipsize => 1) },
+ sort => 0, if_($::expert, gtk => { wrap_width => 2 }, do_not_ellipsize => 1) },
{ label => N("Mount point: "), val => \$part->{mntpoint}, list => [ fsedit::suggestions_mntpoint($all_hds), '' ],
disabled => sub { my $p = fs::type::type_name2subpart($type_name); isSwap($p) || isNonMountable($p) }, type => 'combo', not_edit => 0,
},
@@ -582,7 +582,7 @@ sub Type {
[
{ label => N("Which filesystem do you want?"), title => 1 },
{ label => N("Type"), val => \$type_name, type => 'list', list => \@types, sort => 1, do_not_ellipsize => 1,
- focus => sub { 1 }, not_edit => 1, gtk => { wrap_width => 4 } } ]) or return;
+ focus => sub { 1 }, not_edit => 1, gtk => { wrap_width => 2 } } ]) or return;
my $type = $type_name && fs::type::type_name2subpart($type_name);