[inseparable changes from patch from perl5.003_12 to perl5.003_13]

[p5sagit/p5-mst-13.2.git] / pod / perltie.pod

diff --git a/pod/perltie.pod b/pod/perltie.pod
index 7624881..6bfdf59 100644 (file)
--- a/pod/perltie.pod
+++ b/pod/perltie.pod
@@ -630,7 +630,7 @@ This is the constructor for the class.  That means it is expected to
 return a blessed reference of some sort. The reference can be used to
 hold some internal information.
 
-    sub TIEHANDLE { print "<shout>\n"; my $r; bless \$r, shift }
+    sub TIEHANDLE { print "<shout>\n"; my $i; bless \$i, shift }
 
 =item PRINT this, LIST