--- loncom/homework/response.pm 2006/06/28 21:12:50 1.142 +++ loncom/homework/response.pm 2006/07/14 18:40:41 1.143 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # various response type definitons response definition # -# $Id: response.pm,v 1.142 2006/06/28 21:12:50 albertel Exp $ +# $Id: response.pm,v 1.143 2006/07/14 18:40:41 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -989,7 +989,7 @@ sub add_to_gradingqueue { # a return of 3 means it after the answer date sub check_status { my ($id)=@_; - if (!$id) { $id=$Apache::linputtags::part; } + if (!defined($id)) { $id=$Apache::inputtags::part; } my $curtime=&Apache::lonnet::EXT('system.time'); my $opendate=&Apache::lonnet::EXT("resource.$id.opendate"); my $duedate=&Apache::lonnet::EXT("resource.$id.duedate");