--- loncom/interface/spreadsheet/lonspreadsheet.pm 2006/04/10 22:52:36 1.45 +++ loncom/interface/spreadsheet/lonspreadsheet.pm 2008/12/11 14:55:20 1.52 @@ -1,5 +1,5 @@ # -# $Id: lonspreadsheet.pm,v 1.45 2006/04/10 22:52:36 albertel Exp $ +# $Id: lonspreadsheet.pm,v 1.52 2008/12/11 14:55:20 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -140,11 +140,11 @@ sub file_dialogs { if ($spreadsheet->is_default()) { $filename = 'Default'; } - my $save_dialog = ''. + my $save_dialog = ''. ' '. ''. - ''; + ''; my $makedefault_dialog = ''; # @@ -154,9 +154,9 @@ sub file_dialogs { my $load_dialog = < - + - $link + $link   '; + edit_text += '

'; edit_text += ' @@ -405,7 +403,8 @@ ENDSCRIPT faq => 134, bug => 'Spreadsheet'}); $r->print(&Apache::loncommon::start_page('Grades Spreadsheet',$js). - &Apache::lonhtmlcommon::breadcrumbs(undef,'Spreadsheet'). + &Apache::lonhtmlcommon::breadcrumbs('Spreadsheet', + 'Spreadsheet_About'). '
'); $r->print(&hiddenfield('sname' ,$env{'form.sname'}). &hiddenfield('sdomain',$env{'form.sdomain'}). @@ -467,15 +466,15 @@ ENDSCRIPT my $spreadsheet = undef; if ($sheettype eq 'classcalc') { $spreadsheet = Apache::classcalc->new($name,$domain,$filename,undef, - $section,$group); + $section,\@groups); } elsif ($sheettype eq 'studentcalc') { $spreadsheet = Apache::studentcalc->new($name,$domain,$filename,undef, - $section,$group); + $section,\@groups); } elsif ($sheettype eq 'assesscalc' && defined($symb) && $allowed_to_edit) { $spreadsheet = Apache::assesscalc->new($name,$domain,$filename,$symb, - $section,$group); + $section,\@groups); } else { return HTTP_NOT_ACCEPTABLE; } @@ -558,7 +557,7 @@ END $r->rflush(); $spreadsheet->display($r); } - $r->print('
'); + $r->print(''.&Apache::loncommon::end_page()); $spreadsheet->clear_package(); return OK; }