diff options
| author | Guillaume Cottenceau <gc@mandriva.com> | 2001-11-26 16:33:49 +0000 |
|---|---|---|
| committer | Guillaume Cottenceau <gc@mandriva.com> | 2001-11-26 16:33:49 +0000 |
| commit | 00aa18f86ba5bfa5b242f9e14eead5f061afa27f (patch) | |
| tree | c4fea4501d469fa3ba8fecbcfbed9dbe5460996a /perl-install | |
| parent | 9f2a0ea26a8d8c78a171431793750dfb9453f2af (diff) | |
| download | drakx-00aa18f86ba5bfa5b242f9e14eead5f061afa27f.tar drakx-00aa18f86ba5bfa5b242f9e14eead5f061afa27f.tar.gz drakx-00aa18f86ba5bfa5b242f9e14eead5f061afa27f.tar.bz2 drakx-00aa18f86ba5bfa5b242f9e14eead5f061afa27f.tar.xz drakx-00aa18f86ba5bfa5b242f9e14eead5f061afa27f.zip | |
getAndSaveAutoInstallFloppy: don't die when output'ing of
auto_inst.cfg is not possible
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_any.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index f93a14e4e..00bc741d2 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -770,7 +770,8 @@ sub getAndSaveAutoInstallFloppy { ", "07\n" if !$replay; local $o->{partitioning}{clearall} = !$replay; - output("$mountdir/auto_inst.cfg", g_auto_install($replay)); + eval { output("$mountdir/auto_inst.cfg", g_auto_install($replay)); }; + $@ and log::l("Warning: <$@>"); fs::umount($mountdir); rmdir $mountdir; |