version 1.43, 2001/05/13 20:01:34
|
version 1.46, 2001/06/12 22:42:55
|
Line 186 sub renderpage {
|
Line 186 sub renderpage {
|
my %mystyle; |
my %mystyle; |
my $result = ''; |
my $result = ''; |
&Apache::inputtags::initialize_inputtags; |
&Apache::inputtags::initialize_inputtags; |
|
&Apache::edit::initialize_edit; |
%Apache::lonhomework::results=(); |
%Apache::lonhomework::results=(); |
%Apache::lonhomework::history=&Apache::lonnet::restore(); |
%Apache::lonhomework::history=&Apache::lonnet::restore(); |
#ignore error conditions |
#ignore error conditions |
Line 199 sub renderpage {
|
Line 200 sub renderpage {
|
$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 />"); |
} |
} |
} |
} |
if ($Apache::lonhomework::viewgrades eq 'F') {&createmenu('grade',$request); } |
#if ($Apache::lonhomework::viewgrades eq 'F') {&createmenu('grade',$request); } |
} |
} |
if ($target eq 'grade') { &showhash(%Apache::lonhomework::history); } |
if ($target eq 'grade') { &showhash(%Apache::lonhomework::history); } |
|
|
Line 299 EDITMENU
|
Line 300 EDITMENU
|
sub handler { |
sub handler { |
my $request=$_[0]; |
my $request=$_[0]; |
|
|
if ( $ENV{'user.name'} eq 'albertel' ) {$Apache::lonxml::debug=1;} |
#if ( $ENV{'user.name'} eq 'albertel' ) {$Apache::lonxml::debug=1;} |
|
|
if (&setupheader($request)) { return OK; } |
if (&setupheader($request)) { return OK; } |
$ENV{'request.uri'}=$request->uri; |
$ENV{'request.uri'}=$request->uri; |
Line 338 sub handler {
|
Line 339 sub handler {
|
&renderpage($request,$file); |
&renderpage($request,$file); |
} |
} |
|
|
&Apache::lonhomework::send_footer($request); |
# &Apache::lonhomework::send_footer($request); |
# always turn off debug messages |
# always turn off debug messages |
$Apache::lonxml::debug=0; |
$Apache::lonxml::debug=0; |
return OK; |
return OK; |