View of /trunk/webwork2/lib/WeBWorK/DB/Record/Key.pm

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