Re: Column accessor returning as a ref to Class::DBI::Column

[prev] [thread] [next] [Date index for 2005/01/26]

On Wed, 2005-01-26 at 12:46 -0600, Y00R0B0T wrote:
> package ED::CDBI::Class;
> use base qw( ED::CDBI);
> 
> __PACKAGE__->table('classes');
> __PACKAGE__->columns(Primary=>'class_id');
> __PACKAGE__->columns(Essential=>qw|name etc|);
> 
> package ED::CDBI::Page;
> use base qw( ED::CDBI );
> 
> __PACKAGE__->table('pages');
> __PACKAGE__->columns(Primary=>'page_id');
> __PACKAGE__->columns(Essential=>qw| class_id page_name etc|);
> 
> __PACKAGE__->has_a(class_id=>'Class');

That looks wrong.  Shouldn't it be

__PACKAGE__->has_a(class_id=>'ED::CDBI::Class');

?

- Perrin