[svn:parrot] r39169 - trunk/src/pmc

[chromatic at svn.parrot.org]

Author: chromatic
Date: Mon May 25 07:47:21 2009
New Revision: 39169
URL: https://trac.parrot.org/parrot/changeset/39169

Log:
[PMC] Fixed POD in CodeString PMC so that only documentation appears with
perldoc.

Modified:
   trunk/src/pmc/codestring.pmc

Modified: trunk/src/pmc/codestring.pmc
==============================================================================
--- trunk/src/pmc/codestring.pmc	Mon May 25 02:57:18 2009	(r39168)
+++ trunk/src/pmc/codestring.pmc	Mon May 25 07:47:21 2009	(r39169)
@@ -1,5 +1,5 @@
 /*
-Copyright (C) 2007-2008, Parrot Foundation.
+Copyright (C) 2007-2009, Parrot Foundation.
 $Id$
 
 =head1 NAME
@@ -142,6 +142,8 @@
 Return the line number of the line at offset C<pos>.  This code assumes that
 the first line is line number zero.
 
+=cut
+
 */
 
   METHOD lineof(INTVAL pos) {
@@ -271,6 +273,8 @@
 Converts the Unicode character name given by C<name> to its
 codepoint value.  Returns -1 if an error occurs in conversion.
 
+=cut
+
 */
 
 
@@ -295,7 +299,7 @@
 
 =item C<key( string name1 [, string name2, ...] )>
 
-Construct a PIR key using the strings passed as arguments.
+Constructs a PIR key using the strings passed as arguments.
 For example, C<key('Foo', 'Bar')> returns C<["Foo";"Bar"]>.
 
 =cut