diff options
| author | Guillaume Cottenceau <gc@mandriva.com> | 2001-10-08 15:32:45 +0000 |
|---|---|---|
| committer | Guillaume Cottenceau <gc@mandriva.com> | 2001-10-08 15:32:45 +0000 |
| commit | dd73877eb8d8273c00d390359b6478eefa4ab26a (patch) | |
| tree | e2454dd81947fa57115b0532080407adaa8af510 /mdk-stage1/pci-resource/update-pci-ids.pl | |
| parent | 28b6d723a5d73bc4eb0969a3f4aed680b1441167 (diff) | |
| download | drakx-backup-do-not-use-dd73877eb8d8273c00d390359b6478eefa4ab26a.tar drakx-backup-do-not-use-dd73877eb8d8273c00d390359b6478eefa4ab26a.tar.gz drakx-backup-do-not-use-dd73877eb8d8273c00d390359b6478eefa4ab26a.tar.bz2 drakx-backup-do-not-use-dd73877eb8d8273c00d390359b6478eefa4ab26a.tar.xz drakx-backup-do-not-use-dd73877eb8d8273c00d390359b6478eefa4ab26a.zip | |
ia64
Diffstat (limited to 'mdk-stage1/pci-resource/update-pci-ids.pl')
| -rwxr-xr-x | mdk-stage1/pci-resource/update-pci-ids.pl | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/mdk-stage1/pci-resource/update-pci-ids.pl b/mdk-stage1/pci-resource/update-pci-ids.pl index 16be8273b..adf143e37 100755 --- a/mdk-stage1/pci-resource/update-pci-ids.pl +++ b/mdk-stage1/pci-resource/update-pci-ids.pl @@ -1,5 +1,7 @@ #!/usr/bin/perl +use MDK::Common; + -x "../mar/mar" or die "\t*FAILED* Sorry, need ../mar/mar binary\n"; require '/usr/bin/merge2pcitable.pl'; @@ -20,9 +22,14 @@ struct pci_module_map { my %t = ( network => [ 'network' ], medias => [ 'hd', 'cdrom' ] ); -my %sanity_check = ( network => [ '3c59x', 'eepro100', 'e100', 'tulip', 'via-rhine', 'ne2k-pci', '8139too', 'tlan' ], - medias => [ 'aic7xxx', 'advansys', 'ncr53c8xx', 'sym53c8xx', 'initio' ], - ); +my %sanity_check = + arch() =~ /ia64/ ? + ( network => [ '3c59x', 'eepro100', 'e100', 'tulip', 'via-rhine', 'ne2k-pci', '8139too' ], + medias => [ 'aic7xxx', 'advansys', 'sym53c8xx', 'initio' ], + ) : + ( network => [ '3c59x', 'eepro100', 'e100', 'tulip', 'via-rhine', 'ne2k-pci', '8139too', 'tlan' ], + medias => [ 'aic7xxx', 'advansys', 'ncr53c8xx', 'sym53c8xx', 'initio' ], + ); foreach $type (keys %t) { print STDERR $type; |