summaryrefslogtreecommitdiffstats
path: root/draklive-install
diff options
context:
space:
mode:
Diffstat (limited to 'draklive-install')
-rwxr-xr-xdraklive-install8
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 {