summaryrefslogtreecommitdiffstats
path: root/perl-install/partition_table/gpt.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/partition_table/gpt.pm')
-rw-r--r--perl-install/partition_table/gpt.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/partition_table/gpt.pm b/perl-install/partition_table/gpt.pm
index 81967d07e..5c46e25ca 100644
--- a/perl-install/partition_table/gpt.pm
+++ b/perl-install/partition_table/gpt.pm
@@ -213,6 +213,7 @@ sub raw_removed {
my ($_hd, $raw) = @_;
@$raw = grep { $_->{size} && $_->{pt_type} } @$raw;
}
+sub can_add { &can_raw_add }
sub can_raw_add {
my ($hd) = @_;
@{$hd->{primary}{raw}} < $hd->{primary}{info}{nbPartitions};