From 3274c8723d495a7974cb360720abc88ba5a78a67 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 31 Jul 2002 00:08:34 +0000 Subject: make new perl_checker happy (and that's not easy!) --- perl-install/partition_table/raw.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/partition_table') diff --git a/perl-install/partition_table/raw.pm b/perl-install/partition_table/raw.pm index 3be68fe56..faa4b8fc1 100644 --- a/perl-install/partition_table/raw.pm +++ b/perl-install/partition_table/raw.pm @@ -106,7 +106,7 @@ sub get_geometry($) { { geom => \%geom, totalsectors => $total }; } -sub openit($$;$) { sysopen $_[1], $_[0]{file}, $_[2] || 0; } +sub openit($$;$) { sysopen $_[1], $_[0]{file}, $_[2] || 0 } # cause kernel to re-read partition table sub kernel_read($) { -- cgit v1.2.1