From 8558c1b6785d2853747ef69dcf8a1fe0268531ea Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Wed, 4 Feb 2015 06:07:53 +0100
Subject: perl_checker cleanup

---
 perl-install/partition_table/gpt.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/partition_table/gpt.pm b/perl-install/partition_table/gpt.pm
index 31f7ba855..021bdc6bd 100644
--- a/perl-install/partition_table/gpt.pm
+++ b/perl-install/partition_table/gpt.pm
@@ -156,7 +156,7 @@ sub initialize {
     my @raw;
     for (my $part_number = 0; $part_number < $nb_primary-1; $part_number++) {
         # part_number starts at 1
-        $raw[$part_number] = { part_number => $part_number + 1};
+        $raw[$part_number] = { part_number => $part_number + 1 };
     }
     $hd->{primary} = { raw => \@raw };
     bless $hd, $class;
-- 
cgit v1.2.1