From ddf68d39f1c659069c7efd979dc39956b96e08bf Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 30 Sep 2003 18:42:11 +0000
Subject: perl_checker compliance

---
 perl-install/standalone.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/standalone.pm')

diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm
index 227031d29..c8a81ca89 100644
--- a/perl-install/standalone.pm
+++ b/perl-install/standalone.pm
@@ -182,11 +182,11 @@ sub install {
 }
 
 sub ensure_is_installed {
-    my ($o, $pkg, $file, $auto) = @_;
+    my ($o, $pkg, $file, $b_auto) = @_;
 
     if (! -e $file) {
 	$o->{in}->ask_okcancel('', N("The package %s needs to be installed. Do you want to install it?", $pkg), 1) 
-	  or return if !$auto;
+	  or return if !$b_auto;
 	$o->{in}->do_pkgs->install($pkg);
     }
     if (! -e $file) {
-- 
cgit v1.2.1