]> git.decadent.org.uk Git - maypole.git/blob - lib/Apache/MVC/Model/CDBI.pm
c06703a1fb433d0d6262df880670f28bfa62fc89
[maypole.git] / lib / Apache / MVC / Model / CDBI.pm
1 package Apache::MVC::Model::CDBI;
2 use base 'Apache::MVC::Model::Base';
3 use Class::DBI::AsForm;
4 use Class::DBI::FromCGI;
5
6 sub description { "A poorly defined class" }
7
8 sub column_names { my $class = shift; map { $_ => ucfirst $_ } $class->columns }
9
10 1;