--- loncom/homework/structuretags.pm 2007/10/30 00:17:09 1.407 +++ loncom/homework/structuretags.pm 2007/10/31 01:37:52 1.408 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.407 2007/10/30 00:17:09 albertel Exp $ +# $Id: structuretags.pm,v 1.408 2007/10/31 01:37:52 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -302,16 +302,23 @@ sub remember_problem_state { sub problem_edit_header { return ''. &Apache::structuretags::remember_problem_state().' +
+
+'.&mt('Problem Editing').&Apache::loncommon::help_open_menu('Problem Editing','Problem_Editor_XML_Index',5,'Authoring').' +
+
-
- - -
'. - &Apache::loncommon::help_open_menu('Problem Editing Help','Problem_Editor_XML_Index',5,'Authoring',undef,undef,undef,'Problem Editing Help') - .'
'. +
+
+ + +
+
+
+'. '
'; } @@ -336,12 +343,6 @@ sub problem_web_to_edit_header { my ($rndseed)=@_; my $result .= '
'; - $result.='
'; - $result.=''; - $result .= ''; - $result .= ''; - $result.='
'; - if (!$Apache::lonhomework::parsing_a_task) { $result .= '
'. @@ -443,17 +444,25 @@ $show_all if (!$Apache::lonhomework::parsing_a_task) { my $numtoanalyze=$env{'form.numtoanalyze'}; if (!$numtoanalyze) { $numtoanalyze=20; } - $result .= &mt('[_1] for [_2] versions of this problem.', - '', - ''). - &Apache::loncommon::help_open_topic("Analyze_Problem", - '',undef,undef,300); + $result .= ''. + &mt('[_1] for [_2] versions.', + '', + ''). + &Apache::loncommon::help_open_topic("Analyze_Problem",'',undef,undef,300). + ''; + } $result.='
-
+
'; + $result.=''; + $result .= ''; + $result .= ''; + + $result.=' +
'; return $result; }