version 1.142, 2006/06/28 21:12:50
|
version 1.145, 2006/07/18 18:52:57
|
Line 989 sub add_to_gradingqueue {
|
Line 989 sub add_to_gradingqueue {
|
# a return of 3 means it after the answer date |
# a return of 3 means it after the answer date |
sub check_status { |
sub check_status { |
my ($id)=@_; |
my ($id)=@_; |
if (!$id) { $id=$Apache::linputtags::part; } |
if (!defined($id)) { $id=$Apache::inputtags::part; } |
my $curtime=&Apache::lonnet::EXT('system.time'); |
my $curtime=&Apache::lonnet::EXT('system.time'); |
my $opendate=&Apache::lonnet::EXT("resource.$id.opendate"); |
my $opendate=&Apache::lonnet::EXT("resource.$id.opendate"); |
my $duedate=&Apache::lonnet::EXT("resource.$id.duedate"); |
my $duedate=&Apache::lonnet::EXT("resource.$id.duedate"); |