loncom/interface/loncreateuser.pm - diff

Return to loncreateuser.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.193, 2007/11/10 03:51:46	version 1.195, 2007/11/15 19:06:28
Line 1825 END	Line 1825 END
$r->print($result);	$r->print($result);
}	}
}	}
if ($key=~m{^form\.rev\:([^_]+)_cr\.cr/($match_domain)/($match_username)/(\w+)$ }s) {	if ($key=~m{^form\.rev\:([^_]+)_cr\.cr/($match_domain)/($match_username)/(\w+)$}s) {
# Revoke custom role	# Revoke custom role
$r->print(&mt('Revoking custom role:').	$r->print(&mt('Revoking custom role:').
' '.$4.' by '.$3.':'.$2.' in '.$1.': <b>'.	' '.$4.' by '.$3.':'.$2.' in '.$1.': <b>'.
Line 2823 sub user_search_result {	Line 2823 sub user_search_result {
{&Apache::lonnet::get('environment',	{&Apache::lonnet::get('environment',
['firstname',	['firstname',
'lastname',	'lastname',
'permanentemail'])};	'permanentemail'],
	$cudomain,$cuname)};
}	}
}	}
}	}