diff options
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/drakboot | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot index 63d92dba0..81f566b4d 100755 --- a/perl-install/standalone/drakboot +++ b/perl-install/standalone/drakboot @@ -328,15 +328,15 @@ sub lilo_choice { ask: local $::isEmbedded = 0; - any::setupBootloader($in, $bootloader, $all_hds, $fstab, $ENV{SECURE_LEVEL}) or return; - eval { bootloader::install($bootloader, $fstab, $all_hds->{hds}) }; - + eval { + any::setupBootloader($in, $bootloader, $all_hds, $fstab, $ENV{SECURE_LEVEL}); + bootloader::install($bootloader, $fstab, $all_hds->{hds}); + }; my $loader = arch() =~ /ppc/ ? "Yaboot" : "LILO"; - if ($@) { + my $err = $@; + if ($err) { $in->ask_warn('', - [ N("Installation of %s failed. The following error occured:", $loader), - grep { !/^Warning:/ } cat_("/tmp/.error") ]); - unlink "/tmp/.error"; + [ N("Installation of %s failed. The following error occured:", $loader), $err ]); goto ask; } } |