X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=examples%2FLazyClass.pod;h=0c87b3ac7090934cf83f3345042a61fe7ddd8c2f;hb=afc92ac600289dd8a31b1c4c0a5aa946a2022f1b;hp=262cd73d939df0901e41af647866f1d045e2af98;hpb=e9497117f84bf41a21275cb7a0045b6e775a902e;p=gitmo%2FClass-MOP.git

diff --git a/examples/LazyClass.pod b/examples/LazyClass.pod
index 262cd73..0c87b3a 100644
--- a/examples/LazyClass.pod
+++ b/examples/LazyClass.pod
@@ -38,7 +38,7 @@ our $VERSION = '0.01';
 
 use base 'Class::MOP::Method::Accessor';
 
-sub generate_accessor_method {
+sub _generate_accessor_method {
     my $attr = (shift)->associated_attribute;
 
 	my $attr_name = $attr->name;
@@ -59,7 +59,7 @@ sub generate_accessor_method {
     };
 }
 
-sub generate_reader_method {
+sub _generate_reader_method {
     my $attr = (shift)->associated_attribute;
 
 	my $attr_name = $attr->name;