summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/Xconfigurator.pm5
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+)/;
}