From 92baa7aea16627df7987d1e951544bb99068a7fb Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Wed, 2 Jan 2008 17:39:29 +0000
Subject: remove unused class argument (the caller already checks the class)

---
 perl-install/harddrake/data.pm            | 4 ++--
 perl-install/standalone/service_harddrake | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm
index 3db7b8083..d4e8d2ee2 100644
--- a/perl-install/harddrake/data.pm
+++ b/perl-install/harddrake/data.pm
@@ -45,12 +45,12 @@ sub set_removable_configurator {
  }
 
 sub set_media_auto_configurator {
-    my ($class, $device) = @_;
+    my ($device) = @_;
     return "/usr/sbin/drakupdate_fstab --no-flag --auto --add $device->{device}" if is_auto_configurable_media($device);
 }
 
 sub set_media_remover {
-    my ($class, $device) = @_;
+    my ($device) = @_;
     return "/usr/sbin/drakupdate_fstab --no-flag --del $device->{device}" if is_auto_configurable_media($device);
 }
 
diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake
index 294f07074..dab1428a0 100755
--- a/perl-install/standalone/service_harddrake
+++ b/perl-install/standalone/service_harddrake
@@ -142,10 +142,10 @@ foreach my $hw_class (@harddrake::data::tree) {
     my @configurator_pool;
     if (harddrake::data::is_auto_configurable_class($Ident)) {
         foreach my $device (@ID{@added}) {
-            push @configurator_pool, harddrake::data::set_media_auto_configurator($Ident, $device);
+            push @configurator_pool, harddrake::data::set_media_auto_configurator($device);
         }
         foreach my $device (@$oldconfig{@was_removed}) {
-            push @configurator_pool, harddrake::data::set_media_remover($Ident, $device);
+            push @configurator_pool, harddrake::data::set_media_remover($device);
         }
     } else {
         @configurator_pool = $configurator;
-- 
cgit v1.2.1