);
BeerDB::Beer->untaint_columns(
printable => [qw/abv name price notes/],
+ integer => [qw/style brewery/],
date =>[ qw/date/],
);
use Class::DBI::Loader::Relationship;
BeerDB->config->{loader}->relationship($_) for (
"a brewery produces beers",
- "a beer has a style",
+ "a style defines beers",
"a pub has beers on handpumps");
1;