--- loncom/interface/domainprefs.pm 2012/09/25 23:20:42 1.160.6.7 +++ loncom/interface/domainprefs.pm 2012/10/02 19:38:00 1.160.6.8 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set domain-wide configuration settings # -# $Id: domainprefs.pm,v 1.160.6.7 2012/09/25 23:20:42 raeburn Exp $ +# $Id: domainprefs.pm,v 1.160.6.8 2012/10/02 19:38:00 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1686,9 +1686,7 @@ sub print_quotas { } elsif ($context eq 'requestauthor') { my $curroption; if (ref($settings) eq 'HASH') { - if (ref($settings->{'requestauthor'}) eq 'HASH') { - $curroption = $settings->{'requestauthor'}; - } + $curroption = $settings->{'default'}; } if (!$curroption) { $curroption = 'norequest'; @@ -1833,8 +1831,8 @@ sub print_quotas { $checked = ' checked="checked"'; } $datatable .= ' '; } } else { @@ -5906,6 +5904,10 @@ sub modify_quotas { $cond = $conditions{$inconf{$type}}; } $resulttext .= '