1 package Apache::MVC::Model::Base;
3 sub MODIFY_CODE_ATTRIBUTES {
4 $remember{$_[1]} = $_[2]; ()
7 sub FETCH_CODE_ATTRIBUTES { $remember{$_[1]}
12 return $self->retrieve(shift @{$r->{args}});
17 return $self->retrieve_all;
22 $r->template( my $method = $r->action );
23 $r->objects([ $class->$method($r) ]);