loncom/interface/lonuserutils.pm - diff

Return to lonuserutils.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.5, 2007/11/15 21:24:51	version 1.6, 2007/12/01 03:48:20
Line 159 sub propagate_id_change {	Line 159 sub propagate_id_change {

sub update_classlist {	sub update_classlist {
my ($cdom,$cnum,$udom,$uname,$user) = @_;	my ($cdom,$cnum,$udom,$uname,$user) = @_;
my ($uid,$fullname,$classlistentry);	my ($uid,$classlistentry);
my $fullname =	my $fullname =
&Apache::lonnet::format_name($user->{'firstname'},$user->{'middlename'},	&Apache::lonnet::format_name($user->{'firstname'},$user->{'middlename'},
$user->{'lastname'},$user->{'generation'},	$user->{'lastname'},$user->{'generation'},
Line 1325 sub print_userlist {	Line 1325 sub print_userlist {
my $cnum = $coursehash{'num'};	my $cnum = $coursehash{'num'};
my $cdesc = $coursehash{'description'};	my $cdesc = $coursehash{'description'};
my (@roles,@sections,%access,%users,%userdata,	my (@roles,@sections,%access,%users,%userdata,
%users,%statushash);	%statushash);
if ($env{'form.showrole'} eq 'Any') {	if ($env{'form.showrole'} eq 'Any') {
@roles = &course_roles($context);	@roles = &course_roles($context);
unshift(@roles,'cr');	unshift(@roles,'cr');
Line 1489 sub courses_selector {	Line 1489 sub courses_selector {
my %idnums = ();	my %idnums = ();
my %idlist_titles = ();	my %idlist_titles = ();
my $caller = 'global';	my $caller = 'global';
my $totcodes = 0;
my $format_reply;	my $format_reply;
my $jscript = '';	my $jscript = '';