loncom/homework/inputtags.pm - diff

Return to inputtags.pm CVS log

Up to [LON-CAPA] / loncom / homework

-version 1.303, 2012/06/08 12:25:54
+version 1.304, 2012/06/12 22:02:24
  Line 1139  sub decideoutput {
      if (&Apache::lonhomework::hide_problem_status()
  	&& $Apache::inputtags::status[-1] ne 'SHOW_ANSWER'
  	&& &hide_award($award)) {
- 	$message = &mt("Answer Submitted: Your final submission will be graded after the due date.");
+         $message = &mt("Answer Submitted: Your final submission will be graded after the due date.");
+         my @interval= &Apache::lonnet::EXT("resource.$part.interval");
+         if ($interval[0] =~ /\d+/) {
+             my $first_access=&Apache::lonnet::get_first_access($interval[1]);
+             if (defined($first_access)) {
+                 my $due_date= &Apache::lonnet::EXT("resource.$part.duedate");
+                 unless (($due_date) && ($due_date < $first_access + $interval[0])) {
+                     $message = &mt("Answer Submitted: Your final submission will be graded when the time limit is reached.");
+                 }
+             }
+         }
  	$css_class=$possible_class{'no_grade'};
  	$button=1;
      }