src/newslash_web/lib/Newslash/Model/Users/ACL.pm

   1 package Newslash::Model::Users::ACL;
   2 use Newslash::Model::Base -base;
   3
   4 sub key_definition {
   5     return {
   6             table => "users_acl",
   7             other => [qw(id uid acl)],
   8             aliases => { user_id => "uid",
   9                        }
  10            };
  11 }
  12
  13 sub select {
  14     my $self = shift;
  15     my $params = {@_};
  16     return $self->generic_select(params => $params);
  17 }
  18
  19 sub update {
  20     my $self = shift;
  21     my $params = {@_};
  22     return $self->generic_update(params => $params);
  23 }
  24
  25 1;