--- loncom/interface/loncoursegroups.pm 2009/11/23 14:37:50 1.106 +++ loncom/interface/loncoursegroups.pm 2009/11/25 06:20:20 1.107 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: loncoursegroups.pm,v 1.106 2009/11/23 14:37:50 wenzelju Exp $ +# $Id: loncoursegroups.pm,v 1.107 2009/11/25 06:20:20 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2337,9 +2337,9 @@ sub default_privileges { &Apache::lonhtmlcommon::row_title($lt{'func'},undef, 'LC_groups_functionality')); my @tableHeader; - foreach my $key (sort(keys(%{$functions}))){ - push (@tableHeader,&mt($functions->{$key})); - } + if ((ref($functions) eq 'HASH') && (ref($tools) eq 'ARRAY')) { + @tableHeader = map { $functions->{$_}; } @{$tools}; + } $r->print(join('', @tableHeader)); $r->print(&Apache::lonhtmlcommon::row_closure(1)); my $fixed = '';