From 49ab1f812ba36c447fcd49ad4a2c7d76eb1a9430 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 23 Jan 2003 21:03:24 +0000 Subject: (formatMountPartitions): help perl (otherwise wait_message stays forever in newt) --- perl-install/install_steps_interactive.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install/install_steps_interactive.pm') diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index ea36e3330..62432d535 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -342,6 +342,7 @@ sub formatMountPartitions { $@ =~ /fsck failed on (\S+)/ or return; $o->ask_yesorno('', N("Failed to check filesystem %s. Do you want to repair the errors? (beware, you can loose data)", $1), 1); }; + undef $w; #- help perl (otherwise wait_message stays forever in newt) die N("Not enough swap space to fulfill installation, please add some") if availableMemory() < 40 * 1024; } -- cgit v1.2.1