diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-08-17 23:03:58 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-08-17 23:03:58 +0000 |
commit | 175551618f579623ec87f3b6c12b6eaddb55d660 (patch) | |
tree | f22f51a8b6d5dacf232bc2c6baa25e60ca2a245f /perl-install | |
parent | fb99b425049ff55d76b863c9357d58d5925a3c3d (diff) | |
download | drakx-175551618f579623ec87f3b6c12b6eaddb55d660.tar drakx-175551618f579623ec87f3b6c12b6eaddb55d660.tar.gz drakx-175551618f579623ec87f3b6c12b6eaddb55d660.tar.bz2 drakx-175551618f579623ec87f3b6c12b6eaddb55d660.tar.xz drakx-175551618f579623ec87f3b6c12b6eaddb55d660.zip |
use diskdrake_interactive instead of diskdrake
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_interactive.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install_interactive.pm b/perl-install/install_interactive.pm index 214b8546f..e38adabb1 100644 --- a/perl-install/install_interactive.pm +++ b/perl-install/install_interactive.pm @@ -31,8 +31,8 @@ sub partition_with_diskdrake { $o->set_help('partition_with_diskdrake'); do { $ok = 1; - require diskdrake; - diskdrake::main(interactive_gtk->new, $all_hds, $nowizard); + require diskdrake_interactive; + diskdrake_interactive::main($o, $all_hds, $nowizard); delete $o->{wizard} and return partitionWizard($o, 'nodiskdrake'); my @fstab = fsedit::get_all_fstab($all_hds); @@ -166,7 +166,7 @@ When sure, press Ok.")) or return; } ]; } - if (!$readonly && $o->isa('interactive_gtk')) { #- diskdrake only available in gtk for now + if (!$readonly) { $solutions{diskdrake} = [ 0, _("Custom disk partitioning"), sub { partition_with_diskdrake($o, $all_hds, 'nowizard') } ]; } |