Index: openacs-4/packages/xowf/catalog/xowf.de_DE.ISO-8859-1.xml
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/catalog/xowf.de_DE.ISO-8859-1.xml,v
diff -u -r1.2.2.35 -r1.2.2.36
--- openacs-4/packages/xowf/catalog/xowf.de_DE.ISO-8859-1.xml	23 Sep 2020 09:24:34 -0000	1.2.2.35
+++ openacs-4/packages/xowf/catalog/xowf.de_DE.ISO-8859-1.xml	27 Sep 2020 16:54:52 -0000	1.2.2.36
@@ -30,6 +30,7 @@
   <msg key="feedback_incorrect">Feedback falsch</msg>
   <msg key="lines">Zeilen</msg>
   <msg key="menu-New-Extra-Workflow">Neuer Workflow</msg>
+  <msg key="menu-New-Item-ExamFolder">Neuer Exam-Ordner</msg>
   <msg key="answer">Antwort</msg>
   <msg key="answers">Antworten</msg>
   <msg key="submitted_answers">Abgegebene Antworten</msg>
Index: openacs-4/packages/xowf/catalog/xowf.en_US.ISO-8859-1.xml
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/catalog/xowf.en_US.ISO-8859-1.xml,v
diff -u -r1.2.2.33 -r1.2.2.34
--- openacs-4/packages/xowf/catalog/xowf.en_US.ISO-8859-1.xml	23 Sep 2020 09:24:34 -0000	1.2.2.33
+++ openacs-4/packages/xowf/catalog/xowf.en_US.ISO-8859-1.xml	27 Sep 2020 16:54:52 -0000	1.2.2.34
@@ -30,6 +30,7 @@
   <msg key="feedback_incorrect">Feedback Incorrect</msg>
   <msg key="lines">Lines</msg>
   <msg key="menu-New-Extra-Workflow">New Workflow</msg>
+  <msg key="menu-New-Item-ExamFolder">New Exam Folder</msg>
   <msg key="answer">Answer</msg>
   <msg key="answers">Answers</msg>
   <msg key="submitted_answers">Submitted Answers</msg>
Index: openacs-4/packages/xowf/tcl/test-item-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/test-item-procs.tcl,v
diff -u -r1.7.2.80 -r1.7.2.81
--- openacs-4/packages/xowf/tcl/test-item-procs.tcl	26 Sep 2020 10:42:03 -0000	1.7.2.80
+++ openacs-4/packages/xowf/tcl/test-item-procs.tcl	27 Sep 2020 16:54:52 -0000	1.7.2.81
@@ -4,7 +4,8 @@
   @author Gustaf Neumann
 }
 
-:::xo::db::require package xowiki
+::xo::db::require package xowiki
+::xo::library require xowf-procs
 ::xo::library require -package xowiki menu-procs
 ::xo::library require -package xowiki form-field-procs
 
@@ -2963,11 +2964,40 @@
       {entry -name New.App.InclassExam -form en:inclass-exam.wf}
     }
   }
-}
 
+  ::xowiki::MenuBar instproc config=test-item-exams {
+    {-bind_vars {}}
+    -current_page:required
+    -package_id:required
+    -folder_link:required
+    -return_url
+  } {
+    :config=default \
+        -bind_vars $bind_vars \
+        -current_page $current_page \
+        -package_id $package_id \
+        -folder_link $folder_link \
+        -return_url $return_url
 
+    # {entry -name New.Item.ExamFolder -form en:Folder.form -query p.configure=exam_folder}
 
+    return {
+      {clear_menu -menu New}
+      {entry -name New.Item.ExamFolder -form en:folder.form -query p.source=ExamFolder&publish_status=ready}
+    }
+  }
 
+}
+
+# namespace eval ::xowf {
+#   ::xowf::WorkflowPage instproc configure_page=exam_folder {name} {
+#     ns_log notice "configure_page=exam_folder called on [self] ${:name} ($name) [:info precedence] ia <${:instance_attributes}> "
+#     ns_log notice [:serialize]
+#     dict set :instance_attributes extra_menu_entries {{config -use test-items}}
+#   }
+# }
+
+
 namespace eval ::xowf::test_item {
   #
   # Copy the default policy (policy1) from xowiki and add elements for
Index: openacs-4/packages/xowf/tcl/xowf-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/xowf-procs.tcl,v
diff -u -r1.28.2.40 -r1.28.2.41
--- openacs-4/packages/xowf/tcl/xowf-procs.tcl	26 Sep 2020 17:10:19 -0000	1.28.2.40
+++ openacs-4/packages/xowf/tcl/xowf-procs.tcl	27 Sep 2020 16:54:52 -0000	1.28.2.41
@@ -57,6 +57,8 @@
     TestItemReorder.form
     TestItemUpload.form
 
+    ExamFolder
+    
     online-exam.wf
     inclass-quiz.wf
     inclass-exam.wf