diff options
| -rw-r--r-- | perl-install/detect_devices.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 1cb882cfb..8ed37c67e 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -19,7 +19,7 @@ use feature 'state'; #-##################################################################################### #- Globals #-##################################################################################### -my (%serialprobe, %hd_vendors); +my %serialprobe; #-###################################################################################### #- Functions @@ -262,7 +262,7 @@ sub getSCSI() { } -%hd_vendors = ( +my %hd_vendors = ( "ASUS" => "Asus", "ATA Maxtor" => "Maxtor", "CD-ROM CDU" => "Sony", |