loncom/auth/lonroles.pm - diff

Return to lonroles.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.226, 2009/06/11 19:02:27	version 1.227, 2009/06/12 09:19:21
Line 1529 sub adhoc_roles_row {	Line 1529 sub adhoc_roles_row {
my ($dcdom,$rowtype) = @_;	my ($dcdom,$rowtype) = @_;
my $output = &Apache::loncommon::continue_data_table_row()	my $output = &Apache::loncommon::continue_data_table_row()
.' <td colspan="5">'	.' <td colspan="5">'
.'<table><tr><td>'
.&mt('[_1]Ad hoc[_2] roles in domain [_3] --'	.&mt('[_1]Ad hoc[_2] roles in domain [_3] --'
,'<span class="LC_cusr_emph">','</span>',$dcdom)	,'<span class="LC_cusr_emph">','</span>',$dcdom)
.'</td>'	.' ';
.'<td>';
my $selectcclink = &courselink($dcdom,$rowtype);	my $selectcclink = &courselink($dcdom,$rowtype);
my $ccrole = &Apache::lonnet::plaintext('cc');	my $ccrole = &Apache::lonnet::plaintext('cc');
my $carole = &Apache::lonnet::plaintext('ca');	my $carole = &Apache::lonnet::plaintext('ca');
my $selectcalink = &coauthorlink($dcdom,$rowtype);	my $selectcalink = &coauthorlink($dcdom,$rowtype);
$output.=&mt('[_1]: [_2]',$ccrole,$selectcclink)	$output.=$ccrole.': '.$selectcclink
.'<br /></td>'	.' \| '.$carole.': '.$selectcalink
.'<td>  </td>'
.'<td>'.&mt('[_1]: [_2]',$carole,$selectcalink).'<br /></td>'
.'</tr></table>'
.'</td>'
.&Apache::loncommon::end_data_table_row();	.&Apache::loncommon::end_data_table_row();
return $output;	return $output;
}	}