--- loncom/homework/structuretags.pm 2008/05/28 01:32:55 1.422 +++ loncom/homework/structuretags.pm 2008/06/11 13:52:35 1.423 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.422 2008/05/28 01:32:55 www Exp $ +# $Id: structuretags.pm,v 1.423 2008/06/11 13:52:35 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -312,24 +312,28 @@ 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').' -
+sub problem_edit_buttons { + return '
- + ' onclick="javscript:setmode(this.form,'."'discard'".')" />
-
+
'; +} + +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').' +
'. +&problem_edit_buttons().'
'.&Apache::lonxml::message_location().'
@@ -340,17 +344,8 @@ sub problem_edit_header { sub problem_edit_footer { return '
'.