--- loncom/interface/domainprefs.pm 2008/12/17 21:50:29 1.78 +++ loncom/interface/domainprefs.pm 2008/12/17 22:12:53 1.79 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set domain-wide configuration settings # -# $Id: domainprefs.pm,v 1.78 2008/12/17 21:50:29 raeburn Exp $ +# $Id: domainprefs.pm,v 1.79 2008/12/17 22:12:53 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1317,9 +1317,11 @@ sub print_quotas { '
'; foreach my $item (@usertools) { my $checked = 'checked="checked" '; - if (ref($settings->{$item}) eq 'HASH') { - if ($settings->{$item}->{'_LC_adv'} == 0) { - $checked = ''; + if (ref($settings) eq 'HASH') { + if (ref($settings->{$item}) eq 'HASH') { + if ($settings->{$item}->{'_LC_adv'} == 0) { + $checked = ''; + } } } $datatable .= '