From e4ec3f1db86963391b03d75723d82226ab49705e Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Thu, 3 Apr 2008 05:23:24 +0000 Subject: do not crash when no valid devices is found (#36377) --- draklive-install | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) (limited to 'draklive-install') diff --git a/draklive-install b/draklive-install index 53d89c4..dcdbe8b 100755 --- a/draklive-install +++ b/draklive-install @@ -113,10 +113,16 @@ sub umount_first_pass() { sub init_hds { my ($in, $all_hds, $fstab) = @_; - my $_wait = $in->wait_message('', N("Please wait")); + my $wait = $in->wait_message('', N("Please wait")); umount_first_pass(); - fs::any::get_hds($all_hds, $fstab, [], {}, 'skip_mtab', $in); + eval { fs::any::get_hds($all_hds, $fstab, [], {}, 'skip_mtab', $in) }; + my $err = $@; umount_all($fstab); + if ($err) { + undef $wait; + $in->ask_warn(N("Error"), [ formatError($err) ]); + $in->exit(1); + } } sub ask_partitions_loop { -- cgit v1.2.1