X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=examples%2FLazyClass.pod;h=8aaa30ce6e7741ca35ec7b04efb8d2f8b2f65167;hb=677eb1584b6e27c6079daed35110cb4192153db4;hp=1f504afd14a23be24ab755aaffd827760818298b;hpb=99e5b7e8e18cc7593175b4586e56d53b41932556;p=gitmo%2FClass-MOP.git diff --git a/examples/LazyClass.pod b/examples/LazyClass.pod index 1f504af..8aaa30c 100644 --- a/examples/LazyClass.pod +++ b/examples/LazyClass.pod @@ -77,11 +77,9 @@ LazyClass - An example metaclass with lazy initialization package BinaryTree; - sub meta { - LazyClass->initialize($_[0] => ( - ':attribute_metaclass' => 'LazyClass::Attribute' - )); - } + use metaclass 'LazyClass' => ( + ':attribute_metaclass' => 'LazyClass::Attribute' + ); BinaryTree->meta->add_attribute('$:node' => ( accessor => 'node',