loncom/interface/lonuserutils.pm - diff

Return to lonuserutils.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.182, 2017/01/28 03:48:44	version 1.183, 2017/04/10 23:18:54
Line 3101 END	Line 3101 END
}	}
if ($showcheckbox) {	if ($showcheckbox) {
$r->print('<td><input type="checkbox" name="'.	$r->print('<td><input type="checkbox" name="'.
'actionlist" value="'.&HTML::Entities::encode($checkval,'&<>"').'" /></td>');	'actionlist" value="'.
	&HTML::Entities::encode($checkval,'&<>"').'" />');
	foreach my $item ('start','end') {
	$r->print('<input type="hidden" name="'.
	&HTML::Entities::encode($checkval.'_'.$item,'&<>"').'"'.
	' value="'.$sdata->[$index{$item}].'" />');
	}
	$r->print('</td>');
} else {	} else {
$r->print('<td> </td>');	$r->print('<td> </td>');
}	}
Line 3115 END	Line 3122 END
foreach my $item (@cols) {	foreach my $item (@cols) {
if ($item eq 'username') {	if ($item eq 'username') {
$r->print('<td>'.&print_username_link($mode,\%in).'</td>');	$r->print('<td>'.&print_username_link($mode,\%in).'</td>');
} elsif (($item eq 'start' \|\| $item eq 'end') && ($actionselect)) {
$r->print('<td>'.$in{$item}.'<input type="hidden" name="'.&HTML::Entities::encode($checkval.'_'.$item.'" value="'.$sdata->[$index{$item}],'&<>"').'" /></td>'."\n");
} elsif ($item eq 'status') {	} elsif ($item eq 'status') {
my $showitem = $in{$item};	my $showitem = $in{$item};
if (defined($ltstatus{$in{$item}})) {	if (defined($ltstatus{$in{$item}})) {