--- loncom/homework/lonhomework.pm 2009/05/19 22:52:19 1.311 +++ loncom/homework/lonhomework.pm 2009/06/09 16:33:55 1.312 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Homework handler # -# $Id: lonhomework.pm,v 1.311 2009/05/19 22:52:19 bisitz Exp $ +# $Id: lonhomework.pm,v 1.312 2009/06/09 16:33:55 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -688,9 +688,19 @@ sub handle_save_or_undo { sub analyze_header { my ($request) = @_; my $js = &Apache::structuretags::setmode_javascript(); + + # Breadcrumbs + my $brcrum = [{'href' => &Apache::loncommon::authorspace(), + 'text' => 'Construction Space'}, + {'href' => '', + 'text' => 'Problem Testing'}, + {'href' => '', + 'text' => 'Analyzing a problem'}]; + my $result = - &Apache::loncommon::start_page('Analyzing a problem',$js) - .&Apache::lonhtmlcommon::breadcrumbs() # FIXME add breadcrumbs + &Apache::loncommon::start_page('Analyzing a problem', + $js, + {'bread_crumbs' => $brcrum,}) .&Apache::loncommon::head_subbox( &Apache::loncommon::CSTR_pageheader()); $result .= @@ -916,6 +926,13 @@ sub editxmlmode { my $only_body = ($env{'environment.remote'} eq 'off')? 0 : 1; my $dragmath_button = &Apache::lonhtmlcommon::dragmath_button("LC_editxmltext",1); + + # Breadcrumbs + my $brcrum = [{'href' => &Apache::loncommon::authorspace(), + 'text' => 'Construction Space'}, + {'href' => '', + 'text' => 'Problem Editing'}]; + my $start_page = &Apache::loncommon::start_page(&mt("EditXML [_1]",$file),$js, {'no_auto_mt_title' => 1, @@ -923,10 +940,11 @@ sub editxmlmode { 'add_entries' => { 'onresize' => q[resize_textarea('LC_editxmltext','LC_aftertextarea')], 'onload' => q[resize_textarea('LC_editxmltext','LC_aftertextarea')], - }}); + }, + 'bread_crumbs' => $brcrum, +}); $result=$start_page - .&Apache::lonhtmlcommon::breadcrumbs() # FIXME add breadcrumbs .&Apache::loncommon::head_subbox( &Apache::loncommon::CSTR_pageheader()); $result.=&renderpage($request,$file,['no_output_web'],1). @@ -1140,12 +1158,16 @@ sub newproblem { my $dest = &Apache::lonnet::filelocation("",$request->uri); my $errormsg; my $instructions; + my $brcrum = [{'href' => &Apache::loncommon::authorspace(), + 'text' => 'Construction Space'}, + {'href' => '', + 'text' => "Create New $extension"}]; my $start_page = - &Apache::loncommon::start_page("Create New $extension"); - + &Apache::loncommon::start_page("Create New $extension", + undef, + {'bread_crumbs' => $brcrum,}); $request->print( $start_page - .&Apache::lonhtmlcommon::breadcrumbs() # FIXME add breadcrumbs .&Apache::loncommon::head_subbox( &Apache::loncommon::CSTR_pageheader()) .'

'.&mt("Creating a new $extension resource.")."