From a4accce4f8d057a3f13a80b01c137ff550e5d67b Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 18 Jan 2010 11:22:07 +0000 Subject: forward declare %eide_hds (needed for next commit) --- perl-install/detect_devices.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install') diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 718cfd4ef..5244a3445 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -19,7 +19,7 @@ use feature 'state'; #-##################################################################################### #- Globals #-##################################################################################### -my %serialprobe; +my (%serialprobe, %eide_hds); #-###################################################################################### #- Functions @@ -258,7 +258,7 @@ sub getSCSI() { } -my %eide_hds = ( +%eide_hds = ( "ASUS" => "Asus", "CD-ROM CDU" => "Sony", "CD-ROM Drive/F5D" => "ASUSTeK", -- cgit v1.2.1