--- loncom/interface/domainprefs.pm 2013/12/25 20:43:46 1.218 +++ loncom/interface/domainprefs.pm 2013/12/29 03:32:17 1.219 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set domain-wide configuration settings # -# $Id: domainprefs.pm,v 1.218 2013/12/25 20:43:46 raeburn Exp $ +# $Id: domainprefs.pm,v 1.219 2013/12/29 03:32:17 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -9297,21 +9297,31 @@ sub active_dc_picker { ''.$user; if ($user ne $dcname.':'.$dcdom) { - $table .= ' ('.$dcname.':'.$dcdom.')'. - ''; + $table .= ' ('.$dcname.':'.$dcdom.')'; } + $table .= ''; } $table .= ''; } elsif ($numdcs == 1) { + my ($dcname,$dcdom) = split(':',$domcoord[0]); + my $user = &Apache::loncommon::plainname($dcname,$dcdom); if ($inputtype eq 'radio') { - $table .= ''; + $table .= ''.$user; + if ($user ne $dcname.':'.$dcdom) { + $table .= ' ('.$dcname.':'.$dcdom.')'; + } } else { my $check; if (exists($currhash{$domcoord[0]})) { $check = ' checked="checked"'; } - $table .= ''; + $table .= ''; $rows ++; } }