--- loncom/publisher/lonupload.pm 2009/03/26 16:50:12 1.44 +++ loncom/publisher/lonupload.pm 2009/07/06 13:30:49 1.48 @@ -2,7 +2,7 @@ # The LearningOnline Network with CAPA # Handler to upload files into construction space # -# $Id: lonupload.pm,v 1.44 2009/03/26 16:50:12 bisitz Exp $ +# $Id: lonupload.pm,v 1.48 2009/07/06 13:30:49 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -191,14 +191,14 @@ sub phaseone { '
'. '
'.&mt('Choose file type:').' '.&Apache::loncommon::help_open_topic("Uploading_File_Options").'

'); - $r->print(''); + $r->print(''); # Check for bad extension and warn user if ($fn=~/\.(\w+)$/ && (&Apache::loncommon::fileembstyle($1) eq 'hdn')) { @@ -440,12 +440,21 @@ function verifyForm() { $javascript = "\n"; + # Breadcrumbs + my $brcrum = [{'href' => &Apache::loncommon::authorspace(), + 'text' => 'Construction Space'}, + {'href' => '/adm/upload', + 'text' => 'Upload file to Construction Space'}]; $r->print(&Apache::loncommon::start_page('Upload file to Construction Space', - $javascript)); + $javascript, + {'bread_crumbs' => $brcrum,}) + .&Apache::loncommon::head_subbox( + &Apache::loncommon::CSTR_pageheader()) + ); if (($uname ne $env{'user.name'}) || ($udom ne $env{'user.domain'})) { $r->print('

' - .&mt('Co-Author [_1]:[_2]',$uname,$udom) + .&mt('Co-Author [_1]',$uname.':'.$udom) .'

' ); }