From: Guillermo Roditi Date: Tue, 29 Jan 2008 04:00:04 +0000 (+0000) Subject: I got tired of the DigestColumns interface... X-Git-Tag: v0.08003~4 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=97d76fb4695a3cceb1d0ee73ee0b5a0cef59fefa;p=p5sagit%2FClass-Accessor-Grouped.git I got tired of the DigestColumns interface... --- diff --git a/lib/Class/Accessor/Grouped.pm b/lib/Class/Accessor/Grouped.pm index 404e2a6..81d778a 100644 --- a/lib/Class/Accessor/Grouped.pm +++ b/lib/Class/Accessor/Grouped.pm @@ -363,9 +363,9 @@ Returns: $value Gets the value of the specified component class. __PACKAGE__->mk_group_accessors('component_class' => 'result_class'); - + $self->result_class->method(); - + ## same as $self->get_component_class('result_class')->method(); @@ -390,7 +390,7 @@ it. This method will die if the specified class could not be loaded. __PACKAGE__->mk_group_accessors('component_class' => 'result_class'); __PACKAGE__->result_class('MyClass'); - + $self->result_class->method(); =cut