diff options
author | Florent Villard <warly@mandriva.com> | 2004-12-08 10:44:13 +0000 |
---|---|---|
committer | Florent Villard <warly@mandriva.com> | 2004-12-08 10:44:13 +0000 |
commit | 4983f8df715b7df93d59b83f42d4ed9aeb248d72 (patch) | |
tree | 8ab095fe584bcdb0f45911abc6acd6caae69b409 /perl-install | |
parent | 657432f774f286d27dafbb6d2b1760568244d7a8 (diff) | |
download | drakx-4983f8df715b7df93d59b83f42d4ed9aeb248d72.tar drakx-4983f8df715b7df93d59b83f42d4ed9aeb248d72.tar.gz drakx-4983f8df715b7df93d59b83f42d4ed9aeb248d72.tar.bz2 drakx-4983f8df715b7df93d59b83f42d4ed9aeb248d72.tar.xz drakx-4983f8df715b7df93d59b83f42d4ed9aeb248d72.zip |
fix the updatemodules mode for installation
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_steps.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 0ec73c723..11e642102 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -562,11 +562,12 @@ sub updateModulesFromFloppy { my @dest_files = map { chomp_($_) } run_program::rooted_get_stdout($o->{prefix}, 'find', '/lib/modules'); foreach my $s (@src_files) { log::l("found updatable module $s"); - my ($sfile, $sext) = $s =~ m!([^/\.]*\.k?o)(?:\.gz|\.bz2)?$!; + my ($sfile, $sext) = $s =~ m!([^/\.]*\.k?o)(\.gz|\.bz2)?$!; my $qsfile = quotemeta $sfile; my $qsext = quotemeta $sext; foreach my $target (@dest_files) { $target =~ /$qsfile/ or next; + $target = "$o->{prefix}/$target"; eval { cp_af($s, $target) }; if ($@) { log::l("updating module $target by $s failed: $@"); |