--- loncom/interface/spreadsheet/lonspreadsheet.pm 2003/11/21 18:18:04 1.30 +++ loncom/interface/spreadsheet/lonspreadsheet.pm 2004/02/24 20:47:14 1.34 @@ -1,5 +1,5 @@ # -# $Id: lonspreadsheet.pm,v 1.30 2003/11/21 18:18:04 albertel Exp $ +# $Id: lonspreadsheet.pm,v 1.34 2004/02/24 20:47:14 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -256,10 +256,15 @@ sub handler { $symb = $ENV{'form.usymb'} if (exists($ENV{'form.usymb'})); my $name = $ENV{'user.name'}; my $domain = $ENV{'user.domain'}; - if (exists($ENV{'form.sname'})) { + if (exists($ENV{'form.sname'}) && $ENV{'form.sname'} ne '') { $name = $ENV{'form.sname'}; $domain = $ENV{'form.sdomain'}; } + $ENV{'form.sname'} = $name; + $ENV{'form.sdomain'} = $domain; + # + &Apache::lonnet::logthis('name = "'.$name.'"'); + &Apache::lonnet::logthis('domain = "'.$domain.'"'); ## ## Check permissions my $allowed_to_edit = &Apache::lonnet::allowed('mgr', @@ -365,7 +370,15 @@ sub handler { ENDSCRIPT } + &Apache::lonhtmlcommon::clear_breadcrumbs(); + &Apache::lonhtmlcommon::add_breadcrumb + ({href => $r->uri, + title => &mt('Spreadsheet'), + text => &mt('Spreadsheet'), + faq => 134, + bug => 'Spreadsheet'}); $r->print(''.&Apache::loncommon::bodytag('Grades Spreadsheet'). + &Apache::lonhtmlcommon::breadcrumbs(undef,&mt('Spreadsheet')). '
'); $r->print(&hiddenfield('sname' ,$ENV{'form.sname'}). &hiddenfield('sdomain',$ENV{'form.sdomain'}). @@ -470,11 +483,9 @@ END $r->rflush(); # $r->print(""); - if ($sheettype eq 'classcalc') { - $r->print(''); - } + $r->print(''); if ($allowed_to_view) { $r->print('
'. - ''. + ''. &Apache::loncommon::help_open_topic("Spreadsheet_About",