--- loncom/homework/lonhomework.pm 2010/08/20 03:48:29 1.310.4.1
+++ loncom/homework/lonhomework.pm 2010/08/13 01:33:48 1.317.4.1
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# The LON-CAPA Homework handler
#
-# $Id: lonhomework.pm,v 1.310.4.1 2010/08/20 03:48:29 raeburn Exp $
+# $Id: lonhomework.pm,v 1.317.4.1 2010/08/13 01:33:48 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -692,9 +692,21 @@ sub handle_save_or_undo {
sub analyze_header {
my ($request) = @_;
my $js = &Apache::structuretags::setmode_javascript();
- my $result =
- &Apache::loncommon::start_page('Analyzing a problem',$js);
+ # 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,
+ {'bread_crumbs' => $brcrum,})
+ .&Apache::loncommon::head_subbox(
+ &Apache::loncommon::CSTR_pageheader());
$result .=
&Apache::lonxml::message_location().'
-
+
-
+
';
&Apache::lonxml::add_messages(\$result);
@@ -784,7 +796,7 @@ sub analyze {
}
&Apache::lonhtmlcommon::Update_PrgWin($request,\%prog_state,
&mt('Analyzing Results'));
- $request->print('
'
+ $request->print('
'
.''
.&mt('List of possible answers')
.'
'
@@ -918,6 +930,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,
@@ -925,15 +944,20 @@ sub editxmlmode {
'add_entries' => {
'onresize' => q[resize_textarea('LC_editxmltext','LC_aftertextarea')],
'onload' => q[resize_textarea('LC_editxmltext','LC_aftertextarea')],
- }});
- $result.=$start_page.
- &renderpage($request,$file,['no_output_web'],1).
+ },
+ 'bread_crumbs' => $brcrum,
+});
+
+ $result=$start_page
+ .&Apache::loncommon::head_subbox(
+ &Apache::loncommon::CSTR_pageheader());
+ $result.=&renderpage($request,$file,['no_output_web'],1).
'