From fa0d9cfcff26a0b7585efb51f963c8a649cfa932 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Thu, 9 Jan 2003 13:51:36 +0000 Subject: add update-ldetect-lst after install_addons. --- perl-install/detect_devices.pm | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 975ccb8b1..ab87cadc3 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -420,12 +420,15 @@ EOF sub install_addons { my ($prefix) = @_; - if (-d $prefix) { + #- this test means install_addons can only be called after ldetect-lst has been installed. + if (-d "$prefix/usr/share/ldetect-lst") { + my $update = 0; foreach ([ 'pcitable.d', $pcitable_addons ], [ 'usbtable.d', $usbtable_addons ]) { my ($dir, $str) = @$_; - -d "$prefix/$dir" && $str =~ /^[^#]/m and - output "$prefix/$dir/95drakx.lst", $str; + -d "$prefix/usr/share/ldetect-lst/$dir" && $str =~ /^[^#]/m and $update = 1 and + output "$prefix/usr/share/ldetect-lst/$dir/95drakx.lst", $str; } + $update and run_program::rooted($prefix, "/usr/sbin/update-ldetect-lst"); } } -- cgit v1.2.1