1# $Id$
2
3package Recipe;
4use strict;
5use base qw( Data::ObjectDriver::BaseObject );
6use DodTestUtil;
7
8use Data::ObjectDriver::Driver::DBI;
9
10__PACKAGE__->install_properties({
11    columns => [ 'recipe_id', 'title' ],
12    datasource => 'recipes',
13    primary_key => 'recipe_id',
14    driver => Data::ObjectDriver::Driver::DBI->new(
15        dsn      => DodTestUtil::dsn('global'),
16        reuse_dbh => 1,
17    ),
18});
19
201;
21