use install_steps;
package install_steps;

log::l("updateModulesFromFloppy version needing the exact directories");

undef *updateModulesFromFloppy;
*updateModulesFromFloppy = sub {
    my ($o) = @_;
    return if $::testing;

    fs::mount(devices::make($o->{updatemodules}), "/floppy", "ext2", 0);
    foreach my $kernel_version (all("$::prefix/lib/modules")) {
	log::l("examining updated modules for kernel $kernel_version");
	-d "/floppy/$kernel_version" or next;
	log::l("found updatable modules");
	run_program::run("cd /floppy/$kernel_version ; find -type f | cpio -pdu $::prefix/lib/modules/$kernel_version");
	run_program::rooted($::prefix, 'depmod', '-a', '-F', "/boot/System.map-$kernel_version", $kernel_version);
    }
    fs::umount("/floppy");
};