Diff for /loncom/homework/lonsimpleproblemedit.pm between versions 1.13 and 1.14

version 1.13, 2004/12/14 18:24:17 version 1.14, 2005/03/17 13:56:32
Line 66  sub questiontext { Line 66  sub questiontext {
     return (<<ENDQUESTION);      return (<<ENDQUESTION);
 <table bgcolor="#dddd22" cellspacing="4" cellpadding="2">  <table bgcolor="#dddd22" cellspacing="4" cellpadding="2">
 <tr><td><b>$qt</b><br />  <tr><td><b>$qt</b><br />
 <textarea name="questiontext" cols="80" rows="8">$text</textarea>  <textarea style="width:100%" name="questiontext" cols="80" rows="8">$text</textarea>
 </td></tr>  </td></tr>
 </table>  </table>
 <br />  <br />
Line 79  sub hint { Line 79  sub hint {
     return (<<ENDHINT);      return (<<ENDHINT);
 <table bgcolor="#accacc" cellspacing="4" cellpadding="2">  <table bgcolor="#accacc" cellspacing="4" cellpadding="2">
 <tr><td><b>$ht</b><br />  <tr><td><b>$ht</b><br />
 <textarea name="hinttext" cols="80" rows="4">$text</textarea>  <textarea style="width:100%" name="hinttext" cols="80" rows="4">$text</textarea>
 </td></tr>  </td></tr>
 </table>  </table>
 <br />  <br />
Line 121  sub foil { Line 121  sub foil {
 <tr><td colspan="2"><b>$lt{'foil'}</b></td></tr>  <tr><td colspan="2"><b>$lt{'foil'}</b></td></tr>
 <tr><td>$lt{'value'}: $selectvalue</td><td>$lt{'pos'}: $selectposition</td></tr>  <tr><td>$lt{'value'}: $selectvalue</td><td>$lt{'pos'}: $selectposition</td></tr>
 <tr><td colspan="2">$lt{'text'}:<br />  <tr><td colspan="2">$lt{'text'}:<br />
 <textarea name="text$number" cols="80" rows="4">$text</textarea>  <textarea style="width:100%" name="text$number" cols="80" rows="4">$text</textarea>
 </td></tr>  </td></tr>
 </table>  </table>
 <br />  <br />

Removed from v.1.13  
changed lines
  Added in v.1.14


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