diff options
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) = @_; |