Index: openacs-4/packages/assessment/assessment.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/assessment.info,v
diff -u -r1.36.2.13 -r1.36.2.14
--- openacs-4/packages/assessment/assessment.info 25 Feb 2006 16:09:28 -0000 1.36.2.13
+++ openacs-4/packages/assessment/assessment.info 11 Mar 2006 17:07:04 -0000 1.36.2.14
@@ -7,7 +7,7 @@
f
f
-
+
Eduardo Perez Ureta
Assessment package that will replace the survey,
quizz, complex survey, poll and other data collection packages
@@ -17,7 +17,7 @@
Create assessments and evaluate.
0
-
+
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/assessment/sql/oracle/upgrade/upgrade-0.19-0.20.sql'.
Fisheye: No comparison available. Pass `N' to diff?
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/assessment/sql/postgresql/upgrade/upgrade-0.19-0.20.sql'.
Fisheye: No comparison available. Pass `N' to diff?
Index: openacs-4/packages/assessment/tcl/as-assessment-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-assessment-procs.tcl,v
diff -u -r1.26.2.11 -r1.26.2.12
--- openacs-4/packages/assessment/tcl/as-assessment-procs.tcl 6 Mar 2006 20:51:07 -0000 1.26.2.11
+++ openacs-4/packages/assessment/tcl/as-assessment-procs.tcl 11 Mar 2006 17:07:05 -0000 1.26.2.12
@@ -57,7 +57,8 @@
-creation_user $creator_id \
-content_type {as_assessments} \
-name $name \
- -package_id $package_id]
+ -package_id $package_id \
+ -context_id $parent_id]
set as_assessment_id [content::revision::new \
-item_id $assessment_item_id \
Index: openacs-4/packages/assessment/tcl/as-install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-install-procs.tcl,v
diff -u -r1.30.2.14 -r1.30.2.15
--- openacs-4/packages/assessment/tcl/as-install-procs.tcl 21 Feb 2006 18:09:33 -0000 1.30.2.14
+++ openacs-4/packages/assessment/tcl/as-install-procs.tcl 11 Mar 2006 17:07:05 -0000 1.30.2.15
@@ -238,7 +238,7 @@
} {
# create a content folder
- set folder_id [content::folder::new -name "assessment_$package_id" -package_id $package_id ]
+ set folder_id [content::folder::new -name "assessment_$package_id" -package_id $package_id -context_id $package_id]
# register the allowed content types for a folder
content::folder::register_content_type -folder_id $folder_id -content_type {image} -include_subtypes t
content::folder::register_content_type -folder_id $folder_id -content_type {content_revision} -include_subtypes t