X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FMaypole%2FModel%2FCDBI%2FPlain.pm;h=e4f6cfc5dc419af8d99d6961c5469483cf2e860a;hb=72ebd12372713c17bb79d6510f3da7c7b4561338;hp=6c2709c7095e5ef3e170edfdadcef500215a9173;hpb=ef3da5818c452a331e863d30efc41f5b65d0f624;p=maypole.git diff --git a/lib/Maypole/Model/CDBI/Plain.pm b/lib/Maypole/Model/CDBI/Plain.pm index 6c2709c..e4f6cfc 100644 --- a/lib/Maypole/Model/CDBI/Plain.pm +++ b/lib/Maypole/Model/CDBI/Plain.pm @@ -1,6 +1,8 @@ package Maypole::Model::CDBI::Plain; use base 'Maypole::Model::CDBI'; +Maypole::Config->mk_accessors(qw(table_to_class)); + sub setup_database { my ( $self, $config, $namespace, $classes ) = @_; $config->{classes} = $classes;