loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.222, 2005/11/10 20:43:00	version 1.224, 2005/11/15 18:38:47
Line 919 EDITMENU	Line 919 EDITMENU
sub handler {	sub handler {
#my $t0 = [&gettimeofday()];	#my $t0 = [&gettimeofday()];
my $request=$_[0];	my $request=$_[0];
	$Apache::lonxml::request=$request;
$Apache::lonxml::debug=$env{'user.debug'};	$Apache::lonxml::debug=$env{'user.debug'};
$env{'request.uri'}=$request->uri;	$env{'request.uri'}=$request->uri;
&setuppermissions();	&setuppermissions();
Line 939 sub handler {	Line 939 sub handler {
if ($Apache::lonhomework::browse ne 'F' &&	if ($Apache::lonhomework::browse ne 'F' &&
$env{'request.state'} ne "construct") {	$env{'request.state'} ne "construct") {
#should know where we are, so ask	#should know where we are, so ask
if ( &Apache::lonnet::mod_perl_version() == 2 ) {
&Apache::lonnet::cleanenv();
}
&Apache::lonnet::logthis(&Apache::lonnet::mod_perl_version());
$request->internal_redirect('/adm/ambiguous'); return OK;	$request->internal_redirect('/adm/ambiguous'); return OK;
}	}
}	}