diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 1999-09-27 20:52:11 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 1999-09-27 20:52:11 +0000 |
| commit | f902492a01c974283c9c800ddbd5de651c474c25 (patch) | |
| tree | 4a8eb59f4644fb18ef8e3a448c79061643b60145 /perl-install/modules.pm | |
| parent | 73e7a0f1107be369f7304335082afac4f96ee3d2 (diff) | |
| download | drakx-backup-do-not-use-f902492a01c974283c9c800ddbd5de651c474c25.tar drakx-backup-do-not-use-f902492a01c974283c9c800ddbd5de651c474c25.tar.gz drakx-backup-do-not-use-f902492a01c974283c9c800ddbd5de651c474c25.tar.bz2 drakx-backup-do-not-use-f902492a01c974283c9c800ddbd5de651c474c25.tar.xz drakx-backup-do-not-use-f902492a01c974283c9c800ddbd5de651c474c25.zip | |
no_comment
Diffstat (limited to 'perl-install/modules.pm')
| -rw-r--r-- | perl-install/modules.pm | 27 |
1 files changed, 1 insertions, 26 deletions
diff --git a/perl-install/modules.pm b/perl-install/modules.pm index 682b8959f..010e7b48f 100644 --- a/perl-install/modules.pm +++ b/perl-install/modules.pm @@ -14,31 +14,6 @@ my %conf; my $scsi = 0; my %deps = (); - -#-my @modules_fields = qw(shouldAutoprobe options flags defaultOptions); -#-my %modules = ( -#- "8390" => [ 1 ], -#- "cdu31a" => [ 0, \@cdu31aOptions ], -#- "cm206" => [ 0, \@cm206Options ], -#- "de4x5" => [ 1, \@de4x5Options, 'AUTOPROBE', "io=0" ], -#- "ds" => [ 1, undef, 0, '' ], -#- "fdomain" => [ 1, \@fdomainOptions, 0, '' ], -#- "i82365" => [ 1, undef, 0, '' ], -#- "isofs" => [ 1, undef, 0, '' ], -#- "loop" => [ 1, undef, 0, '' ], -#- "lp" => [ 1, undef, 0, '' ], -#- "parport" => [ 1, undef, 0, '' ], -#- "parport_pc" => [ 1, \@parportPcOptions, 0, "irq=7" ], -#- "mcd" => [ 0, \@mcdOptions, 0, '' ], -#- "ne" => [ 0, \@neOptions, 'FAKEAUTOPROBE', "io=0x300" ], -#- "nfs" => [ 1, undef, 0, '' ], -#- "optcd" => [ 0, \@optcdOptions, 0, '' ], -#- "pcmcia_core" => [ 1, undef, 0, '' ], -#- "sbpcd" => [ 1, \@sbpcdOptions, 0, '' ], -#- "smbfs" => [ 1, undef, 0, '' ], -#- "tcic" => [ 1, undef, 0, '' ], -#- "vfat" => [ 1, undef, 0, '' ], -#-); my @drivers_by_category = ( [ \&detect_devices::hasEthernet, 'net', 'ethernet', { "3c509" => "3com 3c509", @@ -195,7 +170,7 @@ sub load($;$@) { } $conf{'scsi_hostadapter' . ($scsi++ || '')}{alias} = $name - if $type eq 'scsi'; + if $type && $type eq 'scsi'; $conf{$name}{options} = join " ", @options if @options; } |