[BACK]Return to rankresponse.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/rankresponse.pm between versions 1.72.2.1 and 1.76

version 1.72.2.1, 2018/06/08 11:57:01 version 1.76, 2025/01/27 14:46:20
Line 362  sub displayfoils { Line 362  sub displayfoils {
     my $text=$Apache::response::foilgroup{$name.'.text'};      my $text=$Apache::response::foilgroup{$name.'.text'};
     my $value=shift(@correctorder);      my $value=shift(@correctorder);
     if ($target eq 'web') {      if ($target eq 'web') {
  $result.='<br /><b>'.$value.':</b> '.$text;   $result.='<div class="LC_rankfoil"><b>'.$value.':</b> '.$text.'</div>';
     } else {      } else {
  $result.=' \strut\\\\\strut '.$value.':'.$text;   $result.=' \strut\\\\\strut '.$value.':'.$text;
     }      }
Line 433  sub displayfoils { Line 433  sub displayfoils {
  }    } 
     }      }
     if ($target ne 'tex' && $Apache::lonhomework::type ne 'exam') {      if ($target ne 'tex' && $Apache::lonhomework::type ne 'exam') {
  $optionlist='<select onchange="javascript:setSubmittedPart(\''.   $optionlist='<label><select onchange="javascript:setSubmittedPart(\''.
   $part.'\');" name="HWVAL_'.    $part.'\');" name="HWVAL_'.
     $Apache::inputtags::response[-1].':'.$temp.'">'.      $Apache::inputtags::response[-1].':'.$temp.'">'.
         $optionlist."</select>\n";          $optionlist."</select>\n";
Line 444  sub displayfoils { Line 444  sub displayfoils {
     }      }
     my $text=$Apache::response::foilgroup{$name.'.text'};      my $text=$Apache::response::foilgroup{$name.'.text'};
     if ($target ne 'tex') {      if ($target ne 'tex') {
                   $result .= '<div class="LC_rankfoil">';
  if ($Apache::lonhomework::type ne 'exam') {   if ($Apache::lonhomework::type ne 'exam') {
     $result.='<br />'.$optionlist.$text."\n";      $result.=$optionlist.$text."</label>\n";
  } else {   } else {
     $result.='<br />'.$text."\n";      $result.=$text."\n";
  }   }
  if ($Apache::lonhomework::type eq 'exam') {   if ($Apache::lonhomework::type eq 'exam') {
     my @values=(1..scalar(@whichopt));      my @values=(1..scalar(@whichopt));
     $result.=&Apache::optionresponse::webbubbles(\@values,\@whichopt,$temp,$lastopt);      $result.=&Apache::optionresponse::webbubbles(\@values,\@whichopt,$temp,$lastopt);
  }   }
                   $result .= '</div>';
     } else {      } else {
  if ($Apache::lonhomework::type eq 'exam') {   if ($Apache::lonhomework::type eq 'exam') {
                     my $itemlabel;                      my $itemlabel;
Removed from v.1.72.2.1  
changed lines
  Added in v.1.76

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>