diff options
| -rw-r--r-- | perl-install/NEWS | 2 | ||||
| -rw-r--r-- | perl-install/install/NEWS | 2 | ||||
| -rw-r--r-- | perl-install/partition_table/gpt.pm | 6 |
3 files changed, 10 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 504181851..9fc50c807 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,5 @@ +- diskdrake: + o GPT: prevent geometry issue on last partition (mga#18666, mga#17796) - recognize new kernel-4.7 drivers Version 17.48 - 4 July 2016 diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 79cb527d9..beb86f164 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,3 +1,5 @@ +- partionning: + o GPT: prevent geometry issue on last partition (mga#18666, mga#17796) - recognize new kernel-4.7 drivers - try to get patch from ext[2-4] removable media instead of just ext2 diff --git a/perl-install/partition_table/gpt.pm b/perl-install/partition_table/gpt.pm index 30a129772..5ef358e82 100644 --- a/perl-install/partition_table/gpt.pm +++ b/perl-install/partition_table/gpt.pm @@ -14,6 +14,12 @@ my $nb_primary = 128; # See https://en.wikipedia.org/wiki/GUID_Partition_Table#Partition_type_GUIDs for a list of exitings GUIDs +sub last_usable_sector { + my ($hd) = @_; + #- do not use totalsectors because backup GPT is at end + $hd->{totalsectors} - 33; +} + my %parted_mapping = ( 'linux-swap(v1)' => 'swap', 'ntfs' => 'ntfs-3g', |