summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-02-03 15:50:23 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-02-03 15:50:23 +0000
commitbae285dff201074f775e6539462cf577a76c7392 (patch)
treedb056d3b481fd98a7691a2c0574f7727e740b248
parent27bc62c820b056c6d771b0fbbb085f07b38eb7ac (diff)
downloaddrakx-backup-do-not-use-bae285dff201074f775e6539462cf577a76c7392.tar
drakx-backup-do-not-use-bae285dff201074f775e6539462cf577a76c7392.tar.gz
drakx-backup-do-not-use-bae285dff201074f775e6539462cf577a76c7392.tar.bz2
drakx-backup-do-not-use-bae285dff201074f775e6539462cf577a76c7392.tar.xz
drakx-backup-do-not-use-bae285dff201074f775e6539462cf577a76c7392.zip
fix typo
-rw-r--r--perl-install/modules.pm6
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index 47c3bec8c..79f3aa3ed 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -36,7 +36,11 @@ sub load {
my @l = map {
my ($name, @options) = ref($_) ? @$_ : $_;
$options{$name} = \@options;
- dependencies_closure($name);
+ my @l = dependencies_closure($name);
+ if (c::kernel_version() =~ /^\@2.6/) {
+ push @l, "$1-hcd" if $name =~ /(uhci|ohci)/; # usb-uhci, uhci, usb-ohci are deprecated in 2.6
+ }
+ @l;
} @_;
@l = difference2([ uniq(@l) ], [ map { my $s = $_; $s =~ s/_/-/g; $s, $_ } loaded_modules() ]) or return;