diff options
Diffstat (limited to 'perl-install/Xconfig.pm')
| -rw-r--r-- | perl-install/Xconfig.pm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/perl-install/Xconfig.pm b/perl-install/Xconfig.pm index fb1b03cc4..6bad6d93e 100644 --- a/perl-install/Xconfig.pm +++ b/perl-install/Xconfig.pm @@ -93,10 +93,11 @@ sub getinfoFromXF86Config { } } #- get the default resolution according the the current file. - my @depth = keys %{$o->{card}{depth}}; - $o->{resolution_wanted} ||= - ($o->{card}{depth}{$o->{default_depth} || $depth[0]}[0][0]) . "x" . - ($o->{card}{depth}{$o->{default_depth} || $depth[0]}[0][1]); + if (my @depth = keys %{$o->{card}{depth}}) { + $o->{resolution_wanted} ||= + ($o->{card}{depth}{$o->{default_depth} || $depth[0]}[0][0]) . "x" . + ($o->{card}{depth}{$o->{default_depth} || $depth[0]}[0][1]); + } $o; } |