diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-12 14:05:52 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-12 14:05:52 +0000 |
commit | fc6a72175bf8ee7aed801e4003991e8e9c67c304 (patch) | |
tree | 7f435f15fbc29d6869ddd1db9cd95ef33ba77fde /perl-install/partition_table | |
parent | 7902fe25c4e57756cbae9cce1e6a88c32e04b9f4 (diff) | |
download | drakx-fc6a72175bf8ee7aed801e4003991e8e9c67c304.tar drakx-fc6a72175bf8ee7aed801e4003991e8e9c67c304.tar.gz drakx-fc6a72175bf8ee7aed801e4003991e8e9c67c304.tar.bz2 drakx-fc6a72175bf8ee7aed801e4003991e8e9c67c304.tar.xz drakx-fc6a72175bf8ee7aed801e4003991e8e9c67c304.zip |
add/remove some spaces to make perl_checker happy
Diffstat (limited to 'perl-install/partition_table')
-rw-r--r-- | perl-install/partition_table/mac.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/partition_table/mac.pm b/perl-install/partition_table/mac.pm index 33b63aa99..131dcb72f 100644 --- a/perl-install/partition_table/mac.pm +++ b/perl-install/partition_table/mac.pm @@ -257,7 +257,7 @@ sub write($$$;$) { syswrite F, pack($dd_format, @$_{@$dd_fields}), psizeof($dd_format) or return 0; } # zero the rest of the data in the first block. - foreach ( 1 .. (494 - ((@ddstowrite) * 8))) { + foreach (1 .. (494 - ((@ddstowrite) * 8))) { syswrite F, "\0", 1 or return 0; } #c::lseek_sector(fileno(F), $sector, 512) or return 0; |