loncom/interface/loncreateuser.pm - diff

Return to loncreateuser.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.43, 2002/10/03 14:56:48	version 1.44, 2002/11/18 20:06:53
Line 437 ENDOTHERAUTHS	Line 437 ENDOTHERAUTHS
#	#
# Co-Author	# Co-Author
#	#
if (&authorpriv($ENV{'user.name'},$ENV{'request.role.domain'})) {	if (&authorpriv($ENV{'user.name'},$ENV{'request.role.domain'}) &&
	($ENV{'user.name'} ne $ccuname \|\| $ENV{'user.domain'} ne $ccdomain)) {
	# No sense in assigning co-author role to yourself
my $cuname=$ENV{'user.name'};	my $cuname=$ENV{'user.name'};
my $cudom=$ENV{'request.role.domain'};	my $cudom=$ENV{'request.role.domain'};
$r->print(<<ENDCOAUTH);	$r->print(<<ENDCOAUTH);