--- loncom/interface/portfolio.pm 2005/02/11 00:18:14 1.73 +++ loncom/interface/portfolio.pm 2005/02/11 06:18:52 1.74 @@ -499,27 +499,24 @@ sub createdir { sub handler { # this handles file management my $r = shift; - my $bodytag; my $portfolio_root = &Apache::loncommon::propath($ENV{'user.domain'}, $ENV{'user.name'}). '/userfiles/portfolio'; &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, ['selectfile','currentpath','meta', 'currentfile','action','fieldname','mode','rename']); - if ($ENV{"form.mode"} eq 'selectfile'){ - $bodytag = &Apache::loncommon::bodytag('Portfolio Manager',undef,undef,1); - } else { - $bodytag = &Apache::loncommon::bodytag('Portfolio Manager'); - } - &Apache::loncommon::no_cache($r); &Apache::loncommon::content_type($r,'text/html'); $r->send_http_header; # Give the LON-CAPA page header $r->print(''. &mt('Portfolio Manager'). - "\n". - $bodytag); + "\n"); + if ($ENV{"form.mode"} eq 'selectfile'){ + $r->print(&Apache::loncommon::bodytag('Portfolio Manager',undef,undef,1)); + } else { + $r->print(&Apache::loncommon::bodytag('Portfolio Manager')); + } $r->rflush(); if (($ENV{'form.storeupl'} eq 'Upload') & (!$ENV{'form.uploaddoc.filename'})){ $r->print(' No file was selected to upload.'.