--- loncom/homework/structuretags.pm 2011/01/18 21:45:32 1.486
+++ loncom/homework/structuretags.pm 2011/02/06 18:43:10 1.487
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: structuretags.pm,v 1.486 2011/01/18 21:45:32 www Exp $
+# $Id: structuretags.pm,v 1.487 2011/02/06 18:43:10 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -464,27 +464,48 @@ sub remember_problem_state {
';
}
+sub problem_edit_action_button {
+ my ($name,$action,$accesskey,$text,$flag)=@_;
+ my $actionscript="setmode(this.form,'$action')";
+ return "\n";
+}
+
sub problem_edit_buttons {
- return '
-
-
-
-
-
-
-
-
-
';
+ my ($mode)=@_;
+# Buttons that do not save
+ my $result=''.
+ &problem_edit_action_button('subdiscview','discard','d','Discard Edits and View',1);
+ if ($mode eq 'editxml') {
+ $result.=&problem_edit_action_button('subedit','edit','e','Edit',1);
+ $result.=&problem_edit_action_button('subundo','undoxml','u','Undo',1);
+ $result.=&Apache::lonhtmlcommon::dragmath_button("LC_editxmltext",1);
+ } else {
+ $result.=&problem_edit_action_button('subeditxml','editxml','x','EditXML',1);
+ $result.=&problem_edit_action_button('subundo','undo','u','Undo',1);
+ }
+ $result.="\n
";
+# Buttons that save
+ $result.='';
+ if ($mode eq 'editxml') {
+ $result.=&problem_edit_action_button('subsaveedit','saveeditxml','s','Save and EditXML');
+ $result.=&problem_edit_action_button('subsaveview','saveviewxml','v','Save and View');
+ } else {
+ $result.=&problem_edit_action_button('subsaveedit','saveedit','s','Save and Edit');
+ $result.=&problem_edit_action_button('subsaveview','saveview','v','Save and View');
+ }
+ $result.="\n
\n";
+ return $result;
}
sub problem_edit_header {
- return ''.
- &Apache::structuretags::remember_problem_state().'
+ return ''.
+ &remember_problem_state('edit').'