loncom/auth/lonroles.pm - diff

Return to lonroles.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.53, 2003/03/23 01:46:51	version 1.54, 2003/03/24 14:45:09
Line 104 sub handler {	Line 104 sub handler {
# student attempts to register a new key	# student attempts to register a new key
} else {	} else {
# print form to enter a new key	# print form to enter a new key
$r->content_type('text/html');	$r->content_type('text/html');
&Apache::loncommon::no_cache($r);	&Apache::loncommon::no_cache($r);
$r->send_http_header;	$r->send_http_header;
my $swinfo=&Apache::lonmenu::rawconfig();	my $swinfo=&Apache::lonmenu::rawconfig();
my $bodytag=&Apache::loncommon::bodytag	my $bodytag=&Apache::loncommon::bodytag
('Enter Access Key to Unlock this Course');	('Enter Access Key to Unlock this Course');
$r->print(<<ENDENTERKEY);	$r->print(<<ENDENTERKEY);
<head><title>Entering Course Access Key</title>	<head><title>Entering Course Access Key</title>
</head>	</head>
<html>	<html>
Line 125 $swinfo	Line 125 $swinfo
</form>	</form>
</body></html>	</body></html>
ENDENTERKEY	ENDENTERKEY
	return OK;
}	}
}	}
}	}