From 765b1e22ea39a0fb32000e77a6c7f0fe116cd9ed Mon Sep 17 00:00:00 2001 From: Pascal Terjan Date: Mon, 1 Jun 2015 22:18:58 +0000 Subject: only use current disk when auto partitioning, wiping disk, using free space (mga#16055) --- perl-install/diskdrake/interactive.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/diskdrake/interactive.pm') diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index 55059faaa..10b041053 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -363,7 +363,7 @@ sub Auto_allocate { my %all_hds_ = %$all_hds; $all_hds_{hds} = [ sort { $a == $hd ? -1 : 1 } fs::get::hds($all_hds) ]; - eval { fsedit::auto_allocate(\%all_hds_, $suggestions) }; + eval { fsedit::auto_allocate(\%all_hds_, $suggestions, $hd) }; if ($@) { $@ =~ /partition table already full/ or die; -- cgit v1.2.1