|
version 1.28, 2003/11/11 15:48:03
|
version 1.31, 2003/12/08 19:59:09
|
|
Line 227 sub handler {
|
Line 227 sub handler {
|
| } |
} |
| my $courseid = $ENV{'request.course.id'}; |
my $courseid = $ENV{'request.course.id'}; |
| # |
# |
| # Do not allow students to continue if standard grading is in effect. |
# Do not allow students to continue if standard or external grading is in |
| |
# effect. |
| |
# |
| if ($ENV{'request.role'} =~ /^st\./) { |
if ($ENV{'request.role'} =~ /^st\./) { |
| if ($ENV{'course.'.$courseid.'.grading'} eq 'standard') { |
if ($ENV{'course.'.$courseid.'.grading'} eq 'standard' || |
| |
$ENV{'course.'.$courseid.'.grading'} eq 'external' ) { |
| return HTTP_NOT_ACCEPTABLE; |
return HTTP_NOT_ACCEPTABLE; |
| } |
} |
| } |
} |
|
Line 355 sub handler {
|
Line 358 sub handler {
|
| editwin.close(); |
editwin.close(); |
| } |
} |
| |
|
| editwin = window.open($nothing,'CellEditWin','height=280,width=480,scrollbars=no,resizeable=yes,alwaysRaised=yes,dependent=yes',true); |
editwin = window.open($nothing,'CellEditWin','height=280,width=480,scrollbars=no,resizable=yes,alwaysRaised=yes,dependent=yes',true); |
| editwin.document.write(edit_text); |
editwin.document.write(edit_text); |
| } |
} |
| //--> |
//--> |
|
Line 467 END
|
Line 470 END
|
| $r->rflush(); |
$r->rflush(); |
| # |
# |
| $r->print("<table><tr>"); |
$r->print("<table><tr>"); |
| if ($sheettype eq 'classcalc') { |
$r->print('<td><input type="submit" value="'. |
| $r->print('<td><input type="submit" value="'. |
&mt('Generate Spreadsheet').'" />'. |
| &mt('Generate Spreadsheet').'" />'. |
'</td>'); |
| '</td>'); |
|
| } |
|
| if ($allowed_to_view) { |
if ($allowed_to_view) { |
| $r->print('<td>'. |
$r->print('<td>'. |
| &Apache::loncommon::help_open_topic("Spreadsheet_About", |
&Apache::loncommon::help_open_topic("Spreadsheet_About", |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonspreadsheet.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface / spreadsheet