summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 2e97c9bc5..55c43869a 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -1178,11 +1178,14 @@ sub config_dvd {
sub config_mtools {
my ($prefix) = @_;
+ my $file = "$prefix/etc/mtools.conf";
+ -e $file or return;
+
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"
+ } $file;
}
1;