diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-01-05 13:45:42 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-01-05 13:45:42 +0000 |
| commit | eb709bbd83e5979dda24e401fb51a83f14412f39 (patch) | |
| tree | 83c32db4c8d6f4afc3aa28ef8d895ca869e279e6 /perl-install/wizards.pm | |
| parent | cdef0fd204617c22ce6daa871284f3b454afd7da (diff) | |
| download | drakx-eb709bbd83e5979dda24e401fb51a83f14412f39.tar drakx-eb709bbd83e5979dda24e401fb51a83f14412f39.tar.gz drakx-eb709bbd83e5979dda24e401fb51a83f14412f39.tar.bz2 drakx-eb709bbd83e5979dda24e401fb51a83f14412f39.tar.xz drakx-eb709bbd83e5979dda24e401fb51a83f14412f39.zip | |
perl_checker fixes
Diffstat (limited to 'perl-install/wizards.pm')
| -rw-r--r-- | perl-install/wizards.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/wizards.pm b/perl-install/wizards.pm index e7fe2be03..3a5c99ce1 100644 --- a/perl-install/wizards.pm +++ b/perl-install/wizards.pm @@ -108,7 +108,7 @@ my %default_callback = (changed => sub {}, focus_out => sub {}, complete => sub sub process { - my ($w, $o, $in) = @_; + my ($_w, $o, $in) = @_; local $::isWizard = 1; local $::Wizard_title = $o->{name} || $::Wizard_title; local $::Wizard_pix_up = $o->{defaultimage} || $::Wizard_pix_up; |