Bivio::Biz::Model::Club
# Copyright (c) 1999-2006 bivio Software, Inc. All rights reserved. # $Id$ package Bivio::Biz::Model::Club; use strict; use Bivio::Base 'Model.RealmOwnerBase'; sub create_realm { my($self, $club) = (shift, shift); return $self->create($club)->SUPER::create_realm(@_); } sub internal_initialize { return { version => 1, table_name => 'club_t', columns => { club_id => ['RealmOwner.realm_id', 'PRIMARY_KEY'], start_date => ['Date', 'NONE'], }, other => [ [qw(club_id RealmOwner.realm_id)], ], auth_id => 'club_id', }; } 1;