From c53e1ebc11f7777852b23781edbb39480655e80c Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 27 Oct 2004 14:03:58 +0000
Subject: warn about created partition with a given mount point but not
 formatted

---
 perl-install/diskdrake/interactive.pm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index 83b8c3310..7c6c4c3fa 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -268,6 +268,11 @@ sub Done {
 	$::expert or die;
 	$in->ask_okcancel('', [ formatError($err), N("Continue anyway?") ]) or return;
     }
+    if (my $part = find { $_->{mntpoint} && !maybeFormatted($_) } fs::get::fstab($all_hds)) {
+	$in->ask_okcancel('', N("You should format partition %s.
+Otherwise no entry for mount point %s will be written in fstab.
+Quit anyway?", $part->{device}, $part->{mntpoint})) or return;	
+    }
     foreach (@{$all_hds->{hds}}) {
 	if (!write_partitions($in, $_, 'skip_check_rebootNeeded')) {
 	    return if !$::isStandalone;
-- 
cgit v1.2.1