loncom/interface/domainprefs.pm - diff

Return to domainprefs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.72, 2008/12/08 22:42:43	version 1.73, 2008/12/09 04:46:02
Line 3605 sub modify_quotas {	Line 3605 sub modify_quotas {
}	}
foreach my $item (@usertools) {	foreach my $item (@usertools) {
if (ref($changes{$item}) eq 'HASH') {	if (ref($changes{$item}) eq 'HASH') {
	my $hashid = $env{'user.name'}.':'.$env{'user.domain'};
	&Apache::lonnet::devalidate_cache_new('usertools.'.$item,$hashid);
$resulttext .= '<li>'.$titles{$item}.'<ul>';	$resulttext .= '<li>'.$titles{$item}.'<ul>';
foreach my $type (@{$types},'default','_LC_adv') {	foreach my $type (@{$types},'default','_LC_adv') {
if ($changes{$item}{$type}) {	if ($changes{$item}{$type}) {