X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=examples%2FAttributesWithHistory.pod;h=54fcdc4f425881fae9c5f59aeada250900801cbd;hb=1be561756ae40c4237d55ed010b5121762d473b0;hp=5d7ca19b1414d88f8937f512811de6b38e5795ed;hpb=1fdb86fb486a14a2cb3a85bc618365ca98d75a4a;p=gitmo%2FClass-MOP.git

diff --git a/examples/AttributesWithHistory.pod b/examples/AttributesWithHistory.pod
index 5d7ca19..54fcdc4 100644
--- a/examples/AttributesWithHistory.pod
+++ b/examples/AttributesWithHistory.pod
@@ -31,7 +31,7 @@ AttributesWithHistory->meta->add_after_method_modifier('install_accessors' => su
     my ($self) = @_;
     # and now add the history accessor
     $self->associated_class->add_method(
-        $self->process_accessors('history_accessor' => $self->history_accessor())
+        $self->_process_accessors('history_accessor' => $self->history_accessor())
     ) if $self->has_history_accessor();
 });