- partitioning wizard lirary:

  o allow "Use free space" if there is an extended
  partition even if all primary partitions are used (#38804)
  (*old* bug!)

1 files changed, 6 insertions, 0 deletions

diff --git a/perl-install/partition_table/raw.pm b/perl-install/partition_table/raw.pm
index 6edc26507..44b4b6e01 100644
--- a/perl-install/partition_table/raw.pm
+++ b/perl-install/partition_table/raw.pm
@@ -192,6 +192,12 @@ sub openit {
     my $F; sysopen($F, $hd->{file}, $o_mode || 0) && $F;
 }
 
+sub can_add {
+    my ($hd) = @_;
+    !$_->{size} && !$_->{pt_type} || isExtended($_) and return 1 foreach @{$hd->{primary}{raw}};
+    0;
+}
+
 sub raw_removed {
     my ($_hd, $_raw) = @_;
 }