From 41cdcd66418b78b662ab0d80f7b645b4f65a5cc6 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 27 Sep 2004 10:34:40 +0000
Subject: fix typos

---
 perl-install/partition_table/lvm_PV.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/perl-install/partition_table/lvm_PV.pm b/perl-install/partition_table/lvm_PV.pm
index d7cefc080..b53867d5f 100644
--- a/perl-install/partition_table/lvm_PV.pm
+++ b/perl-install/partition_table/lvm_PV.pm
@@ -18,11 +18,12 @@ use c;
 
 
 sub read {
-    my ($hd, $sector) = @_;
+    my ($hd, $_sector) = @_;
 
+    require fs::type;
     my $t = fs::type::type_subpart_from_magic($hd);
 
-    $t && $t->{pt_type} eq 0x8e or die "bad magic number on disk $hd->{device}";
+    $t && $t->{pt_type} == 0x8e or die "bad magic number on disk $hd->{device}";
 
     [];
 }
-- 
cgit v1.2.1