From 3f3a82426afa9c25cb977c26c4b8afbaa5194b1a Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 19 Aug 2002 10:53:38 +0000
Subject: (getAndSaveAutoInstallFloppy): ensure mount fail doesn't cause any pb

---
 perl-install/install_any.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 80b2d92e3..e9c0a3dc2 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -803,7 +803,7 @@ sub getAndSaveAutoInstallFloppy {
 	getAndSaveInstallFloppy($o, $imagefile) or return;
 
 	my $dev = devices::set_loop($imagefile) or log::l("couldn't set loopback device"), return;
-        fs::mount($dev, $mountdir, 'vfat', 0);
+        eval { fs::mount($dev, $mountdir, 'vfat', 0); 1 } or return;
 
 	substInFile { 
 	    s/timeout.*/$replay ? 'timeout 1' : ''/e;
-- 
cgit v1.2.1