diff options
Diffstat (limited to 'draklive-install')
-rwxr-xr-x | draklive-install | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/draklive-install b/draklive-install index a97e4bf..85fd437 100755 --- a/draklive-install +++ b/draklive-install @@ -150,7 +150,7 @@ sub copy_root { my ($in, $copy_source) = @_; my $total = get_total_size($in, $copy_source); - my ($_wait, $update_progress) = copying_message_with_progress_bar($in, N("Copying in progress")); + my ($wait, $update_progress) = copying_message_with_progress_bar($in, N("Copying in progress")); open(my $OUTPUT, '-|', build_copy_command($copy_source, $::prefix)); { local $_; @@ -164,6 +164,12 @@ sub copy_root { } } } + if (!close($OUTPUT)) { + undef $wait; + undef $update_progress; + $in->ask_warn(N("Error"), N("Unable to copy files to new root")); + $in->exit(1); + } } sub complete_install { |