loncom/interface/lonnavmaps.pm - diff

Return to lonnavmaps.pm CVS log

Up to [LON-CAPA] / loncom / interface

-version 1.538, 2017/12/21 03:50:57
+version 1.539, 2018/01/04 12:07:53
  Line 702  sub getDescription {
      }
      if (($status == $res->ANSWER_OPEN || $status == $res->PARTIALLY_CORRECT)
  	&& $res->handgrade($part) ne 'yes') {
-         return &Apache::lonhtmlcommon::direct_parm_link(&mt("Answer available"),$res->symb(),'answerdate,duedate',$part);
+         my $msg = &mt('Answer available');
+         my $parmlist = 'answerdate,duedate';
+         if (($res->is_tool) && ($res->is_gradable())) {
+             if (($status == $res->PARTIALLY_CORRECT) && ($res->parmval('retrypartial',$part))) {
+                 $msg = &mt('Grade received');
+                 $parmlist = 'retrypartial';
+             } else {
+                 $msg = &mt('Grade available');
+             }
+         }
+         return &Apache::lonhtmlcommon::direct_parm_link($msg,$res->symb(),$parmlist,$part);
      }
      if ($status == $res->EXCUSED) {
          return &mt("Excused by instructor");