--- loncom/auth/lonroles.pm 2017/03/08 02:51:13 1.327 +++ loncom/auth/lonroles.pm 2017/03/13 18:14:13 1.328 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # User Roles Screen # -# $Id: lonroles.pm,v 1.327 2017/03/08 02:51:13 raeburn Exp $ +# $Id: lonroles.pm,v 1.328 2017/03/13 18:14:13 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1735,9 +1735,11 @@ sub privileges_info { sub build_roletext { my ($trolecode,$tdom,$trest,$tstatus,$tryagain,$advanced,$tremark,$tbg,$trole,$twhere, $tpstart,$tpend,$nochoose,$button,$switchserver,$reinit,$switchwarning,$skipcal) = @_; - my ($roletext,$roletext_end); - my $is_dc=($trolecode =~ m/^dc\./); - my $rowspan=($is_dc) ? '' + my ($roletext,$roletext_end,$poss_adhoc); + if ($trolecode =~ m/^d(c|h|a)\./) { + $poss_adhoc = 1; + } + my $rowspan=($poss_adhoc) ? '' : ' rowspan="2" '; unless ($nochoose) { @@ -1798,7 +1800,7 @@ sub build_roletext { .'