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

Diff for /loncom/homework/chemresponse.pm between versions 1.92 and 1.93

version 1.92, 2013/05/03 16:29:40 version 1.93, 2014/02/13 18:13:22
Line 87  JMESECTION Line 87  JMESECTION
     my $insert_answer;      my $insert_answer;
     if ($shown_text eq '') {       if ($shown_text eq '') { 
  $insert_answer=   $insert_answer=
     '<input type="button" name="submit" value="Insert Answer" onclick="javascript:submitSmiles();" />';      '<input type="button" name="submit" value="'.&mt('Insert Answer').'" onclick="javascript:submitSmiles();" />';
     }      }
   
     my $js = <<CHEMJS;      my $js = <<CHEMJS;
Line 117  CHEMJS Line 117  CHEMJS
     my $end_page =      my $end_page =
   &Apache::loncommon::end_page({'js_ready' => 1,});    &Apache::loncommon::end_page({'js_ready' => 1,});
     my $java_not_enabled=&Apache::lonhtmlcommon::java_not_enabled();      my $java_not_enabled=&Apache::lonhtmlcommon::java_not_enabled();
       my %lt = &Apache::lonlocal::texthash(
           'seltext' => 'Select substituent...',
           'close'   => 'Close',
           'help'    => 'Help',
          );
     my $body=<<CHEMPAGE;      my $body=<<CHEMPAGE;
 $js  $js
 <center>  <center>
Line 125  $js Line 130  $js
     <td></td>      <td></td>
     <td align="right">      <td align="right">
       <select onchange="javascript:substituent(options[selectedIndex].text)">        <select onchange="javascript:substituent(options[selectedIndex].text)">
         <option>Select substituent</option>          <option>$lt{'seltext'}</option>
         <option>-C(=O)OH</option>          <option>-C(=O)OH</option>
         <option>-C(=O)OMe</option>          <option>-C(=O)OMe</option>
         <option>-OC(=O)Me</option>          <option>-OC(=O)Me</option>
Line 151  $molecule Line 156  $molecule
 <br />  <br />
 $insert_answer  $insert_answer
 <br />  <br />
 <input type="button" value="  Close  " onclick = "javascript:window.close()" />  <input type="button" value="$lt{'close'}" onclick="javascript:window.close()" />
 &nbsp;&nbsp;  &nbsp;&nbsp;
 <input type="button" value="  Help  " onclick = "javascript:openHelpWindow()" />  <input type="button" value="$lt{'help'}" onclick="javascript:openHelpWindow()" />
 </form>  </form>
 </center>  </center>
 CHEMPAGE  CHEMPAGE
Line 377  sub end_organicresponse { Line 382  sub end_organicresponse {
   
 sub format_prior_answer_organic {  sub format_prior_answer_organic {
     my ($mode,$answer,$other_data) = @_;      my ($mode,$answer,$other_data) = @_;
     my $result=&mt('Smile representation: "[_1]"','<tt>'.$answer.'</tt>');      my $result=&mt('Smile representation: [_1]','"<tt>'.$answer.'</tt>"');
     my $jme=$other_data->[0];      my $jme=$other_data->[0];
     $result.=&jme_img($jme,$answer,400);      $result.=&jme_img($jme,$answer,400);
     return $result;      return $result;
Removed from v.1.92  
changed lines
  Added in v.1.93

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