use Catalyst qw/
...
Authentication
Authentication::Credential::HTTP
Authorization::Roles
...
/;
...
realms => {
default => {
store => {
class => 'DBIx::Class',
user_class =>
'......::Model::General::AdminUser',
role_relation => 'user_roles',
id_field => 'login',
role_field => 'name',
}
}
}
Result:
SELECT me.id, me.cdate, me.login, me.pwd, me.name FROM admin_user me WHERE (
id = ? ): 'bogdan'
^^^^^^
_______________________________________________
List: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/dbix-class
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/DBIx-Class/
Searchable Archive: http://www.grokbase.com/group/[EMAIL PROTECTED]