# -*- mode: cperl; tab-width: 8; indent-tabs-mode: nil; basic-offset: 2 -*-
# vim:ts=8:sw=2:et:sta:sts=2
package t::user::admin;
use strict;
use warnings;
use base qw(ClearPress::model);

sub fields {
  return qw(username);
}

sub is_member_of {
  my ($self, $groupname) = @_;
  if($groupname eq 'admin') {
    return 1;
  }
  return;
}

1;