From 4418886a61d6f201223ce4ea9b79f329d4098c8b Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Tue, 11 Dec 2012 13:18:06 +0000
Subject: (part) if a partition has been manually formated, don't offer to
 format it again (for draklive-install, mga#7822)

---
 perl-install/fs/format.pm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'perl-install/fs/format.pm')

diff --git a/perl-install/fs/format.pm b/perl-install/fs/format.pm
index c511cf51d..5b87f22f1 100644
--- a/perl-install/fs/format.pm
+++ b/perl-install/fs/format.pm
@@ -114,6 +114,7 @@ sub part {
 	$wait_message->(N("Formatting partition %s", $part->{device})) if $wait_message;
 	part_raw($part, $wait_message);
     }
+    undef $part->{toFormat};
 }
 
 sub write_label {
-- 
cgit v1.2.1