loncom/interface/loncoursegroups.pm - diff

Return to loncoursegroups.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.17, 2006/05/18 01:08:50	version 1.18, 2006/05/18 14:03:23
Line 3122 sub automapping {	Line 3122 sub automapping {
<td> </td>	<td> </td>
<td colspan="3">	<td colspan="3">
<nobr>'.$$lt{'auad'}.':	<nobr>'.$$lt{'auad'}.':
<input type="radio" name="autoadd" value="on" />on  <input type="radio" name="autoadd" value="off" checked="checked" />off');	<label><input type="radio" name="autoadd" value="on" />on  </label><label><input type="radio" name="autoadd" value="off" checked="checked" />off</label>');
if ($action eq 'modify') {	if ($action eq 'modify') {
$r->print('    ('.$$lt{'curr'}.' <b>'.$$lt{$add}.'</b>)');	$r->print('    ('.$$lt{'curr'}.' <b>'.$$lt{$add}.'</b>)');
}	}
Line 3134 sub automapping {	Line 3134 sub automapping {
<td> </td>	<td> </td>
<td colspan="3">	<td colspan="3">
<nobr>'.$$lt{'auex'}.':	<nobr>'.$$lt{'auex'}.':
<input type="radio" name="autodrop" value="on" />on  <input type="radio" name="autodrop" value="off" checked="checked" />off');	<label><input type="radio" name="autodrop" value="on" />on  </label><label><input type="radio" name="autodrop" value="off" checked="checked" />off</label>');
if ($action eq 'modify') {	if ($action eq 'modify') {
$r->print('    ('.$$lt{'curr'}.' <b>'.$$lt{$drop}.'</b>)');	$r->print('    ('.$$lt{'curr'}.' <b>'.$$lt{$drop}.'</b>)');
}	}