From 21fbfdfead833c685b255edb3c3460198ce89877 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sun, 6 Aug 2000 13:43:26 +0000
Subject: no_comment

---
 perl-install/install_any.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

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

diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 80b6f4f26..e972e8c5a 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -882,6 +882,7 @@ sub partitionWizard {
 	push @solutions, [ _("Use existing partition"), sub { $o->ask_mntpoint_s($o->{fstab}) } ];
     } elsif (@l = grep { isFat($_) } @$fstab) {
     }
+    require diskdrake;
     push @solutions, 
       [ _("Take over the hard drive (beware!)"), 
 	sub {
@@ -891,7 +892,8 @@ sub partitionWizard {
 	    partition_table_raw::zero_MBR($hd);
 	    fsedit::auto_allocate($hds, $o->{partitions});
 	    1;
-	} ];
+	} ],
+      [ _("Use diskdrake"), sub { diskdrake::main($hds, $o->{raid}, interactive_gtk->new, $o->{partitions}); 1 } ],
 }
 
 1;
-- 
cgit v1.2.1