diff options
| -rw-r--r-- | perl-install/NEWS | 2 | ||||
| -rw-r--r-- | perl-install/do_pkgs.pm | 6 |
2 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 84540e02d..29a2b024b 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,4 +1,6 @@ - fix installed modules detection (#34478) +- when checking dkms module packages, check that modules are either + available in urpmi media, or already installed (fix detection in live) Version 10.4.235 - 4 October 2007, by Thierry Vignaud diff --git a/perl-install/do_pkgs.pm b/perl-install/do_pkgs.pm index 6bed053d8..a660954c7 100644 --- a/perl-install/do_pkgs.pm +++ b/perl-install/do_pkgs.pm @@ -91,11 +91,13 @@ sub check_kernel_module_packages { my ($do, $base_name) = @_; require bootloader; - my @rpms = ( + my @test_rpms = ( 'dkms-' . $base_name, map { $base_name . '-kernel-' . bootloader::vmlinuz2version($_) } bootloader::installed_vmlinuz() ); - @rpms = $do->are_available(@rpms) or return; + @rpms = $do->are_available(@test_rpms); + @rpms = $do->are_installed(@test_rpms) if !@rpms; + @rpms or return; log::l("those kernel module packages can be installed: " . join(' ', @rpms)); |