--- loncom/interface/domainprefs.pm 2017/05/22 07:58:46 1.300 +++ loncom/interface/domainprefs.pm 2017/06/05 21:12:05 1.301 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set domain-wide configuration settings # -# $Id: domainprefs.pm,v 1.300 2017/05/22 07:58:46 droeschl Exp $ +# $Id: domainprefs.pm,v 1.301 2017/06/05 21:12:05 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3261,8 +3261,10 @@ sub print_helpsettings { my $css_class; my %existing=&Apache::lonnet::dump('roles',$dom,$confname,'rolesdef_'); my (%customroles,%ordered,%current); - if (ref($settings->{'adhoc'}) eq 'HASH') { - %current = %{$settings->{'adhoc'}}; + if (ref($settings) eq 'HASH') { + if (ref($settings->{'adhoc'}) eq 'HASH') { + %current = %{$settings->{'adhoc'}}; + } } my $count = 0; foreach my $key (sort(keys(%existing))) {