summaryrefslogtreecommitdiffstats
path: root/perl-install/detect_devices.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/detect_devices.pm')
-rw-r--r--perl-install/detect_devices.pm5
1 files changed, 5 insertions, 0 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 312c3c128..2b79772aa 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -74,6 +74,11 @@ sub cdroms_and_zips__faking_ide_scsi() {
$faked = "sd" . chr(ord('a') + $nb_zip++);
log::l("IDE Zip: $e->{device} => $faked and $e->{devfs_prefix}");
}
+ if ($::move) {
+ #- make it use ide-scsi *now*, not after reboot
+ output("/proc/ide/$e->{device}/settings", 'ide_scsi:1');
+ output("/proc/ide/$e->{device}/driver", 'ide-scsi');
+ }
$e->{device} = $faked;
}
get_devfs_devices(@l_need_fake);