View of /trunk/webwork-modperl/lib/WeBWorK/DB/Record/PermissionLevel.pm

    1 ################################################################################
    2 # WeBWorK mod_perl (c) 2000-2002 WeBWorK Project
    3 # $Id$
    4 ################################################################################
    5 
    6 package WeBWorK::DB::Record::PermissionLevel;
    7 use base WeBWorK::DB::Record;
    8 
    9 =head1 NAME
   10 
   11 WeBWorK::DB::Record::PermissionLevel - represent a record from the permission
   12 table.
   13 
   14 =cut
   15 
   16 use strict;
   17 use warnings;
   18 
   19 sub KEYFIELDS {qw(
   20   user_id
   21 )}
   22 
   23 sub NONKEYFIELDS {qw(
   24   permission
   25 )}
   26 
   27 sub FIELDS {qw(
   28   user_id
   29   permission
   30 )}
   31 
   32 1;