summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-06-01 08:20:22 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-06-01 08:20:22 +0000
commitc2e2cfa5665fc4c8259d3dfa1f554ed9a36e2941 (patch)
tree8d0e12413aed4f42f9dd84e52acb74eb1f6f13d3 /perl-install
parent93b8f64d18dedd0d7a732b7a86a66d0611ed5431 (diff)
downloaddrakx-c2e2cfa5665fc4c8259d3dfa1f554ed9a36e2941.tar
drakx-c2e2cfa5665fc4c8259d3dfa1f554ed9a36e2941.tar.gz
drakx-c2e2cfa5665fc4c8259d3dfa1f554ed9a36e2941.tar.bz2
drakx-c2e2cfa5665fc4c8259d3dfa1f554ed9a36e2941.tar.xz
drakx-c2e2cfa5665fc4c8259d3dfa1f554ed9a36e2941.zip
fix "two windows after exception" bug
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakboot3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot
index 3298a3d39..e41a50da1 100755
--- a/perl-install/standalone/drakboot
+++ b/perl-install/standalone/drakboot
@@ -252,8 +252,9 @@ sub lilo_choice() {
if ($err && $err !~ /wizcancel/) {
# BUG: note that the following message won't speak about the right bootloader if user is currently switching between
# various bootloaders and if the error occured before boot sector get overwritten by bootloader installer
- $in->ask_warn(N("Error"),
+ my $w = $in->ask_warn(N("Error2"),
[ N("Installation of %s failed. The following error occured:", bootloader::detect_bootloader()), $err ]);
+ undef $w;
goto ask;
}
}