diff options
author | Francois Pons <fpons@mandriva.com> | 2001-09-14 17:03:36 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2001-09-14 17:03:36 +0000 |
commit | dd34a8c52724e2811a6674c1d4eec04e6bc033bf (patch) | |
tree | 3328614d484a76b5e1ec16b22b09d2529e69dbc4 /perl-install | |
parent | 0f5bbac03cd5e5056ed6982dfdb5bcf02c843188 (diff) | |
download | drakx-dd34a8c52724e2811a6674c1d4eec04e6bc033bf.tar drakx-dd34a8c52724e2811a6674c1d4eec04e6bc033bf.tar.gz drakx-dd34a8c52724e2811a6674c1d4eec04e6bc033bf.tar.bz2 drakx-dd34a8c52724e2811a6674c1d4eec04e6bc033bf.tar.xz drakx-dd34a8c52724e2811a6674c1d4eec04e6bc033bf.zip |
fixed filtering of depth for newt version.
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/Xconfigurator.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index 18ef410da..684f34222 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -871,8 +871,9 @@ sub chooseResolutions($$;$) { my $allowed_depth = allowedDepth($card); local $_ = $in->ask_from_list(_("Resolutions"), "", - [ if_(!$allowed_depth || exists $allowed_depth->{$::a}, - map_each { map { "$_->[0]x$_->[1] ${main::a}bpp" } @$::b } %{$card->{depth}}) ]) or return; + [ map_each { if_(!$allowed_depth || exists $allowed_depth->{$::a}, + map { "$_->[0]x$_->[1] ${main::a}bpp" } @$::b) } %{$card->{depth}} ]) + or return; reverse /(\d+)x\S+ (\d+)/; } |