summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-08-05 08:16:24 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-08-05 08:16:24 +0000
commitf95bbe0c4e87db1f21636ded4c340c5ef4c690a0 (patch)
tree316231c8c442cb4d576a13c9ea0f48a2932f85cd /perl-install
parentb3f272636e35b17190acc7835218b17dcddc432d (diff)
downloaddrakx-f95bbe0c4e87db1f21636ded4c340c5ef4c690a0.tar
drakx-f95bbe0c4e87db1f21636ded4c340c5ef4c690a0.tar.gz
drakx-f95bbe0c4e87db1f21636ded4c340c5ef4c690a0.tar.bz2
drakx-f95bbe0c4e87db1f21636ded4c340c5ef4c690a0.tar.xz
drakx-f95bbe0c4e87db1f21636ded4c340c5ef4c690a0.zip
write auto_inst.cfg after making room on the floppy image
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_any.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 95c73953c..4c4dd0334 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -888,12 +888,6 @@ sub getAndSaveAutoInstallFloppies {
my $dev = devices::set_loop($img) or log::l("couldn't set loopback device"), return;
find { eval { fs::mount($dev, $mountdir, $_, 0); 1 } } qw(ext2 vfat) or return;
- if (@imgs == 1 || $img =~ /drivers/) {
- local $o->{partitioning}{clearall} = !$replay;
- eval { output("$mountdir/auto_inst.cfg", g_auto_install($replay)) };
- $@ and log::l("Warning: <", formatError($@), ">");
- }
-
if (-e "$mountdir/menu.lst") {
# hd_grub boot disk is different than others
substInFile {
@@ -915,6 +909,12 @@ sub getAndSaveAutoInstallFloppies {
including any Windows partitions !!
" . "07\n";
}
+
+ if (@imgs == 1 || $img =~ /drivers/) {
+ local $o->{partitioning}{clearall} = !$replay;
+ eval { output("$mountdir/auto_inst.cfg", g_auto_install($replay)) };
+ $@ and log::l("Warning: <", formatError($@), ">");
+ }
fs::umount($mountdir);
devices::del_loop($dev);