--- loncom/interface/domainprefs.pm 2014/01/03 19:53:47 1.160.6.31
+++ loncom/interface/domainprefs.pm 2014/01/06 14:08:31 1.160.6.33
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set domain-wide configuration settings
#
-# $Id: domainprefs.pm,v 1.160.6.31 2014/01/03 19:53:47 raeburn Exp $
+# $Id: domainprefs.pm,v 1.160.6.33 2014/01/06 14:08:31 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -404,7 +404,7 @@ sub handler {
if ($phase eq 'process') {
my $result = &Apache::lonconfigsettings::make_changes($r,$dom,$phase,$context,\@prefs_order,
\%prefs,\%domconfig,$confname,\@roles);
- if (ref($result) eq 'HASH') {
+ if ((ref($result) eq 'HASH') && (keys(%{$result}))) {
$r->rflush();
&devalidate_remote_domconfs($dom,$result);
}
@@ -9278,12 +9278,14 @@ sub active_dc_picker {
''.$user;
if ($user ne $dcname.':'.$dcdom) {
- $table .= ' ('.$dcname.':'.$dcdom.')'.
+ $table .= ' ('.$dcname.':'.$dcdom.')';
}
- $table .= '';
+ $table .= '';
}
$table .= '';
} elsif ($numdcs == 1) {
+ my ($dcname,$dcdom) = split(':',$domcoord[0]);
+ my $user = &Apache::loncommon::plainname($dcname,$dcdom);
if ($inputtype eq 'radio') {
$table .= ''.$user;
if ($user ne $dcname.':'.$dcdom) {