--- loncom/homework/grades.pm 2003/12/02 02:52:10 1.164 +++ loncom/homework/grades.pm 2003/12/02 04:50:26 1.165 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.164 2003/12/02 02:52:10 albertel Exp $ +# $Id: grades.pm,v 1.165 2003/12/02 04:50:26 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1376,7 +1376,9 @@ sub submission { return; } - $ENV{'form.lastSub'} = ($ENV{'form.lastSub'} eq '' ? 'datesub' : $ENV{'form.lastSub'}); + if (!$ENV{'form.lastSub'}) { $ENV{'form.lastSub'} = 'datesub'; } + if (!$ENV{'form.vProb'}) { $ENV{'form.vProb'} = 'yes'; } + if (!$ENV{'form.vAns'}) { $ENV{'form.vAns'} = 'yes'; } my $last = ($ENV{'form.lastSub'} eq 'last' ? 'last' : ''); my $checkIcon = '';