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 -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