Index: openacs-4/packages/xowf/lib/online-exam.wf =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/lib/online-exam.wf,v diff -u -N -r1.6.2.14 -r1.6.2.15 --- openacs-4/packages/xowf/lib/online-exam.wf 29 Jan 2020 10:02:46 -0000 1.6.2.14 +++ openacs-4/packages/xowf/lib/online-exam.wf 30 Jan 2020 18:12:31 -0000 1.6.2.15 @@ -22,11 +22,13 @@ # An admin might with to add the following entries to the folder to ease # creation of exercises and exams # +# {clear_menu -menu New} +# # {entry -name New.Item.TextInteraction -label "Text Interaction" -form en:TestItemText.form} # {entry -name New.Item.ShortTextInteraction -label "Short Text Interaction" -form en:TestItemShortText.form} # {entry -name New.Item.MCInteraction -label "MC Interaction" -form en:TestItemMC.form} # {entry -name New.Item.SCInteraction -label "SC Interaction" -form en:TestItemSC.form} -# {entry -name New.App.Exam -label Exam -form en:online-exam.wf} +# {entry -name New.App.Exam -label "Online Exam" -form en:online-exam.wf} # # The policy has to allow the following methods on FormPages: # @@ -41,7 +43,7 @@ set :autoname 1 ;# to avoid editable name field set :policy ::xowf::test_item::test-item-policy-publish set :debug 0 -set :live_updates 0 +set :live_updates 1 Action select -next_state created -label #xowf.online-exam-select# \ -title #xowf.online-exam-title-select# @@ -151,8 +153,8 @@ set aLink [$obj pretty_link -query m=answer] set pLink [$obj pretty_link -query m=print-answers] #util_user_message -html -message "$survey is available as $pLink" - set menu "\[#xowf.refresh#,\ - #xowf.online-exam-exam_instances#,\ + # [#xowf.refresh#, + set menu "\[#xowf.online-exam-exam_instances#,\ #xowf.online-exam-protocol#\]" } @@ -185,7 +187,7 @@ set answerStats "" } - append text "$menu $answerStats\n" + append text "$answerStats\n" append report "$menu $extraAction" # Remove wrapping forms