From eb709bbd83e5979dda24e401fb51a83f14412f39 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 5 Jan 2004 13:45:42 +0000 Subject: perl_checker fixes --- perl-install/wizards.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/wizards.pm') 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; -- cgit v1.2.1