diff options
| -rw-r--r-- | perl-install/Xconfigurator.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index 484aaa171..119b5da64 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -923,7 +923,7 @@ sub resolutionsConfiguration { my $wres = first(split 'x', $res); #- take the first available resolution <= the wanted resolution - $wres = max map { first(grep { $_->[0] <= $wres } @$_)->[0] } values %{$card->{depth}}; + eval { $wres = max map { first(grep { $_->[0] <= $wres } @$_)->[0] } values %{$card->{depth}} }; my $depth = eval { $o->{default_depth} || autoDefaultDepth($card, $wres) }; $auto or ($depth, $wres) = chooseResolutions($card, $depth, $wres) or return; |