diff options
author | Francois Pons <fpons@mandriva.com> | 2003-01-08 16:21:58 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2003-01-08 16:21:58 +0000 |
commit | 2e185993a85ba4934cc25b852124214072077b4c (patch) | |
tree | f95bf40249cbaa3b765a889d0b48e887dd3b3756 /perl-install | |
parent | 9e9fd4f3bd7a22b94d1f72f28f1f7f944324e26b (diff) | |
download | drakx-backup-do-not-use-2e185993a85ba4934cc25b852124214072077b4c.tar drakx-backup-do-not-use-2e185993a85ba4934cc25b852124214072077b4c.tar.gz drakx-backup-do-not-use-2e185993a85ba4934cc25b852124214072077b4c.tar.bz2 drakx-backup-do-not-use-2e185993a85ba4934cc25b852124214072077b4c.tar.xz drakx-backup-do-not-use-2e185993a85ba4934cc25b852124214072077b4c.zip |
added install_addons to install pcitable or usbtable addons.
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/detect_devices.pm | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index aaf375b86..975ccb8b1 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -417,6 +417,18 @@ $usbtable_addons = <<'EOF'; # add here lines conforming the usbtable format (0xXXXX\t0xXXXX\t"\w+"\t".*") EOF +sub install_addons { + my ($prefix) = @_; + + if (-d $prefix) { + foreach ([ 'pcitable.d', $pcitable_addons ], [ 'usbtable.d', $usbtable_addons ]) { + my ($dir, $str) = @$_; + -d "$prefix/$dir" && $str =~ /^[^#]/m and + output "$prefix/$dir/95drakx.lst", $str; + } + } +} + sub add_addons { my ($addons, @l) = @_; |