diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-01-08 16:36:30 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-01-08 16:36:30 +0000 |
commit | 4853428679b16e13068729ef2fe091ac74ec2f3e (patch) | |
tree | c82715f556703932704df6bb1b393ee159bdd564 /perl-install/Xconfig | |
parent | 86d3990a137bcf3bb061797979da01a507138cab (diff) | |
download | drakx-4853428679b16e13068729ef2fe091ac74ec2f3e.tar drakx-4853428679b16e13068729ef2fe091ac74ec2f3e.tar.gz drakx-4853428679b16e13068729ef2fe091ac74ec2f3e.tar.bz2 drakx-4853428679b16e13068729ef2fe091ac74ec2f3e.tar.xz drakx-4853428679b16e13068729ef2fe091ac74ec2f3e.zip |
perl_checker compliance
Diffstat (limited to 'perl-install/Xconfig')
-rw-r--r-- | perl-install/Xconfig/resolution_and_depth.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/Xconfig/resolution_and_depth.pm b/perl-install/Xconfig/resolution_and_depth.pm index 8c095a64b..7c115bd63 100644 --- a/perl-install/Xconfig/resolution_and_depth.pm +++ b/perl-install/Xconfig/resolution_and_depth.pm @@ -143,8 +143,8 @@ sub choose { val => \$resolution, type => 'list', sort => 0, list => [ sort { $a->{X} <=> $b->{X} } @resolutions ], format => sub { "$_[0]{X}x$_[0]{Y} $_[0]{Depth}bpp" }, - } ]) - and $resolution; + } ]) or return; + $resolution; } |