From 5654d1ae791fc037b8cb094e6691734c21f3a4b2 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Wed, 12 Mar 2003 10:55:35 +0000
Subject: let it look better

---
 perl-install/standalone/service_harddrake | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake
index cb1d68295..f87bb0722 100755
--- a/perl-install/standalone/service_harddrake
+++ b/perl-install/standalone/service_harddrake
@@ -59,7 +59,7 @@ foreach (@harddrake::data::tree) {
         foreach my $device (@ID{@added}) {
             push @configurator_pool, harddrake::data::set_removable_configurator($Ident, $device);
         };
-        foreach my $device (@{$oldconfig}{@was_removed}) {
+        foreach my $device (@$oldconfig{@was_removed}) {
             push @configurator_pool, harddrake::data::set_removable_remover($Ident, $device);
         }
     } else {
-- 
cgit v1.2.1