From: Abigail <abigail@abigail.be>
Date: Mon, 28 Dec 1998 21:39:15 +0000 (+0200)
Subject: Typos in pod.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c5c7a622c0d82a63327bf3fa06564167fddd087d;p=p5sagit%2Fp5-mst-13.2.git

Typos in pod.

To: perl5-porters@perl.org (Perl Porters)
Message-ID: <MLIST_19981228191612.8380.qmail@alexandra.wayne.fnx.com>

p4raw-id: //depot/cfgperl@2518
---

diff --git a/lib/fields.pm b/lib/fields.pm
index db2eea7..54602a6 100644
--- a/lib/fields.pm
+++ b/lib/fields.pm
@@ -32,7 +32,7 @@ does so by updating the %FIELDS hash in the calling package.
 If a typed lexical variable holding a reference is used to access a
 hash element and the %FIELDS hash of the given type exists, then the
 operation is turned into an array access at compile time.  The %FIELDS
-hash map from hash element names to the array indices.  If the hash
+hash maps from hash element names to the array indices.  If the hash
 element is not present in the %FIELDS hash, then a compile-time error
 is signaled.
 
@@ -57,7 +57,7 @@ constructor like this does the job:
   {
       my $class = shift;
       no strict 'refs';
-      my $self = bless [\%{"$class\::FIELDS"], $class;
+      my $self = bless [\%{"$class\::FIELDS"}], $class;
       $self;
   }