From cfd30f11c05ce5b9413018a33d14bef204c3af10 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 16 Sep 2003 16:29:42 +0000
Subject: pixelization

---
 perl-install/install_steps.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'perl-install/install_steps.pm')

diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 103059cd7..7ac795c2c 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -255,8 +255,7 @@ sub choosePartitionsToFormat($$) {
 	$_->{mntpoint} or next;
 	
 	add2hash_($_, { toFormat => $_->{notFormatted} });
-        $_->{toFormatUnsure} = member($_->{mntpoint}, '/', '/usr');
-	$_->{toFormat} ||= $::recovery && delete $_->{toFormatUnsure};
+        $_->{$::recovery ? 'toFormat' : 'toFormatUnsure'} ||= member($_->{mntpoint}, '/', '/usr');
 
 	if (!$_->{toFormat}) {
 	    my $t = fsedit::typeOfPart($_->{device});
-- 
cgit v1.2.1