diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2003-04-22 21:59:30 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2003-04-22 21:59:30 +0000 |
| commit | dad25588ed26afe49277032b8b1b24b063e34efa (patch) | |
| tree | ed2e1f85e3e34ab626550ef27e3a858fa57d308a /perl-install/Xconfig/xfree3.pm | |
| parent | e70327417f8ce3bd2a03c7da1fd46ea2a8e8e4b0 (diff) | |
| download | drakx-dad25588ed26afe49277032b8b1b24b063e34efa.tar drakx-dad25588ed26afe49277032b8b1b24b063e34efa.tar.gz drakx-dad25588ed26afe49277032b8b1b24b063e34efa.tar.bz2 drakx-dad25588ed26afe49277032b8b1b24b063e34efa.tar.xz drakx-dad25588ed26afe49277032b8b1b24b063e34efa.zip | |
perl_checker compliance for optional method arguments
Diffstat (limited to 'perl-install/Xconfig/xfree3.pm')
| -rw-r--r-- | perl-install/Xconfig/xfree3.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/Xconfig/xfree3.pm b/perl-install/Xconfig/xfree3.pm index 8d6ce63da..450ce3461 100644 --- a/perl-install/Xconfig/xfree3.pm +++ b/perl-install/Xconfig/xfree3.pm @@ -102,11 +102,11 @@ sub new_device_sections { } sub is_fbdev { - my ($raw_X, $Screen) = @_; + my ($raw_X, $o_Screen) = @_; - my $Screen_ = $Screen || $raw_X->get_default_screen or return; + my $Screen = $o_Screen || $raw_X->get_default_screen or return; - val($Screen_->{Server}) eq 'FBDev'; + val($Screen->{Server}) eq 'FBDev'; } sub set_Option {} |