version 1.14, 2003/06/20 16:55:46
|
version 1.17, 2003/07/17 15:22:14
|
Line 214 sub handler {
|
Line 214 sub handler {
|
$r->uri.":opa:0:0:Cannot modify spreadsheet"; |
$r->uri.":opa:0:0:Cannot modify spreadsheet"; |
return HTTP_NOT_ACCEPTABLE; |
return HTTP_NOT_ACCEPTABLE; |
} |
} |
|
my $courseid = $ENV{'request.course.id'}; |
|
# |
|
# Do not allow students to continue if standard grading is in effect. |
|
if ($ENV{'request.role'} =~ /^st\./) { |
|
if ($ENV{'course.'.$courseid.'.grading'} eq 'standard') { |
|
return HTTP_NOT_ACCEPTABLE; |
|
} |
|
} |
# |
# |
# Get query string for limited number of parameters |
# Get query string for limited number of parameters |
# |
# |
Line 278 sub handler {
|
Line 286 sub handler {
|
} |
} |
} |
} |
|
|
# ================================================================== Good to go |
|
|
|
# |
# |
# Open page, try to prevent browser cache. |
# Open page, try to prevent browser cache. |
# |
# |
$r->content_type('text/html'); |
$r->content_type('text/html'); |
$r->header_out('Cache-control','no-cache'); |
&Apache::loncommon::no_cache($r); |
$r->header_out('Pragma','no-cache'); |
|
$r->send_http_header; |
$r->send_http_header; |
|
|
# |
# |
Line 432 END
|
Line 437 END
|
if ($allowed_to_view || $allowed_to_edit) { |
if ($allowed_to_view || $allowed_to_edit) { |
$r->print($spreadsheet->parent_link()); |
$r->print($spreadsheet->parent_link()); |
} |
} |
|
$r->rflush(); |
$spreadsheet->display($r); |
$spreadsheet->display($r); |
} |
} |
$r->print('</form></body></html>'); |
$r->print('</form></body></html>'); |