diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/any.pm | 9 | ||||
| -rw-r--r-- | perl-install/install_steps.pm | 1 |
2 files changed, 10 insertions, 0 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index b8e5e54cc..2e97c9bc5 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -1176,4 +1176,13 @@ sub config_dvd { } } +sub config_mtools { + my ($prefix) = @_; + my ($f1, $f2) = detect_devices::floppies_dev(); + substInFile { + s|drive a: file="(.*?)"|drive a: file="/dev/$f1"|; + s|drive b: file="(.*?)"|drive b: file="/dev/$f2"| if $f2; + } "$prefix/etc/mtools.conf" +} + 1; diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index cea22abfc..fb5ca0659 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -422,6 +422,7 @@ Consoles 1,3,4,7 may also contain interesting information"; touch "$o->{prefix}/var/lock/TMP_1ST"; any::config_dvd($o->{prefix}); + any::config_mtools($o->{prefix}); any::writeandclean_ldsoconf($o->{prefix}); |