From 73c851144720e28b21a491b6250385170db9d752 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 24 Apr 2003 19:00:12 +0000
Subject: perl_checker adaptations + fixes

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

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

diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 8158c23e0..46ae5bf15 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -35,7 +35,7 @@ use log;
 #-######################################################################################
 #- In/Out Steps Functions
 #-######################################################################################
-sub errorInStep($$) {
+sub errorInStep {
     my ($o, $err) = @_;
     $o->ask_warn(N("Error"), [ N("An error occurred"), formatError($err) ]);
 }
@@ -45,7 +45,9 @@ sub kill_action {
     $o->kill;
 }
 
-sub charsetChanged {}
+sub charsetChanged {
+    my ($_o) = @_;
+}
 
 #-######################################################################################
 #- Steps Functions
-- 
cgit v1.2.1