From 594fd5f0bed65bbeaa66543062e620c2382f814c Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 12 Dec 2002 14:07:30 +0000 Subject: when clicking on one of the legend buttons together with an existing partition selected, it doesn't change the partition type, it tells to use "Type" (it used to be ignored in non-expert, and do a change type in expert) --- perl-install/diskdrake/hd_gtk.pm | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'perl-install/diskdrake') diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm index 2c2be3faa..41df6a5f9 100644 --- a/perl-install/diskdrake/hd_gtk.pm +++ b/perl-install/diskdrake/hd_gtk.pm @@ -350,11 +350,8 @@ sub createOrChangeType { } elsif (!$type) { $in->ask_warn('', N("Use ``%s'' instead", N("Delete"))) if $part->{type}; } elsif ($part->{type}) { - return unless $::expert; return if $type == $part->{type}; - isBusy($part) and $in->ask_warn('', N("Use ``Unmount'' first")), return; - diskdrake::interactive::ask_alldatawillbelost($in, $part, N_("After changing type of partition %s, all data on this partition will be lost")) or return; - diskdrake::interactive::check_type($in, $type, $hd, $part) and fsedit::change_type($type, $hd, $part); + $in->ask_warn('', isBusy($part) ? N("Use ``Unmount'' first") : N("Use ``%s'' instead", N("Type"))); } else { $part->{type} = $type; diskdrake::interactive::Create($in, $hd, $part, $all_hds); -- cgit v1.2.1