version 1.74, 2002/03/29 18:32:46
|
version 1.76, 2002/04/09 04:46:33
|
Line 334 sub renderpage {
|
Line 334 sub renderpage {
|
&Apache::edit::initialize_edit; |
&Apache::edit::initialize_edit; |
if ($target eq 'analyze') { %Apache::lonhomework::anaylze=(); } |
if ($target eq 'analyze') { %Apache::lonhomework::anaylze=(); } |
if ($target eq 'web') { |
if ($target eq 'web') { |
if (&Apache::lonnet::symbread() eq '') { |
my ($symb)=&Apache::lonxml::whichuser(); |
|
if ($symb eq '') { |
if ($ENV{'request.state'} eq "construct") { |
if ($ENV{'request.state'} eq "construct") { |
} else { |
} else { |
$request->print("Browsing or <a href=\"/adm/ambiguous\">ambiguous</a> reference, submissions ignored<br />"); |
$request->print("Browsing or <a href=\"/adm/ambiguous\">ambiguous</a> reference, submissions ignored<br />"); |
Line 359 sub renderpage {
|
Line 360 sub renderpage {
|
} else { |
} else { |
if ($target eq 'analyze') { |
if ($target eq 'analyze') { |
$result=&Apache::lonnet::hashref2str(\%Apache::lonhomework::analyze); |
$result=&Apache::lonnet::hashref2str(\%Apache::lonhomework::analyze); |
|
undef(%Apache::lonhomework::analyze); |
} |
} |
#my $td=&tv_interval($t0); |
#my $td=&tv_interval($t0); |
#if ( $Apache::lonxml::debug) { |
#if ( $Apache::lonxml::debug) { |