loncom/interface/loncoursegroups.pm - diff

Return to loncoursegroups.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.102, 2009/06/05 12:49:50	version 1.103, 2009/09/09 04:31:53
Line 1888 sub choose_members_form {	Line 1888 sub choose_members_form {
}	}
}	}
&privilege_specificity($r,$action,$specimg,$tools,$stored,$toolprivs,	&privilege_specificity($r,$action,$specimg,$tools,$stored,$toolprivs,
$fixedprivs,\@available,$formname,$gpterm,$ucgpterm);	$fixedprivs,\@available,$formname,$gpterm,$ucgpterm,
	$functions);
my $newusers = &pick_new_members($r,$action,$formname,\@available,$idx,	my $newusers = &pick_new_members($r,$action,$formname,\@available,$idx,
$stored,$memimg,$users,$userdata,	$stored,$memimg,$users,$userdata,
$granularity,\%origmembers,$gpterm,	$granularity,\%origmembers,$gpterm,
Line 2298 sub default_privileges {	Line 2299 sub default_privileges {
'LC_groups_functionality'));	'LC_groups_functionality'));
my @tableHeader;	my @tableHeader;
foreach my $key (sort(keys(%{$functions}))){	foreach my $key (sort(keys(%{$functions}))){
push (@tableHeader,&mt(${$functions}{$key}));	push (@tableHeader,&mt($functions->{$key}));
}	}
$r->print(join('</td><td class="LC_groups_functionality">', @tableHeader));	$r->print(join('</td><td class="LC_groups_functionality">', @tableHeader));
$r->print(&Apache::lonhtmlcommon::row_closure(1));	$r->print(&Apache::lonhtmlcommon::row_closure(1));