From a4e14fec987246dde7e9f757a9ae9e1834080d33 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 14 Nov 2002 23:40:08 +0000 Subject: make perl_checker happy --- perl-install/partition_table/mac.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/partition_table/mac.pm') diff --git a/perl-install/partition_table/mac.pm b/perl-install/partition_table/mac.pm index cf5ca8a37..d455584cf 100644 --- a/perl-install/partition_table/mac.pm +++ b/perl-install/partition_table/mac.pm @@ -128,7 +128,7 @@ sub read($$) { c::lseek_sector(fileno(F), $sector, 512) or die "reading of partition in sector $sector failed"; my @pt; - for (my $i = 0;$i < $partmapsize;$i++) { + for (my $i = 0; $i < $partmapsize; $i++) { my $part; sysread F, $part, psizeof($p_format) or die "error while reading partition info in sector $sector"; -- cgit v1.2.1