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.5 -r1.6 --- openacs-4/packages/assessment/tcl/as-assessment-procs.tcl 22 Nov 2004 11:59:22 -0000 1.5 +++ openacs-4/packages/assessment/tcl/as-assessment-procs.tcl 26 Nov 2004 20:48:37 -0000 1.6 @@ -12,7 +12,6 @@ {-description ""} {-instructions ""} {-mode ""} - {-editable_p ""} {-anonymous_p ""} {-secure_access_p ""} {-reuse_responses_p ""} @@ -50,7 +49,6 @@ -attributes [list [list creator_id $creator_id] \ [list instructions $instructions] \ [list mode $mode] \ - [list editable_p $editable_p] \ [list anonymous_p $anonymous_p] \ [list secure_access_p $secure_access_p] \ [list reuse_responses_p $reuse_responses_p] \ @@ -79,7 +77,6 @@ {-description ""} {-instructions ""} {-mode ""} - {-editable_p ""} {-anonymous_p ""} {-secure_access_p ""} {-reuse_responses_p ""} @@ -113,7 +110,6 @@ -attributes [list [list creator_id $creator_id] \ [list instructions $instructions] \ [list mode $mode] \ - [list editable_p $editable_p] \ [list anonymous_p $anonymous_p] \ [list secure_access_p $secure_access_p] \ [list reuse_responses_p $reuse_responses_p] \ @@ -184,7 +180,6 @@ -attributes [list [list creator_id $a(creator_id)] \ [list instructions $a(instructions)] \ [list mode $a(mode)] \ - [list editable_p $a(editable_p)] \ [list anonymous_p $a(anonymous_p)] \ [list secure_access_p $a(secure_access_p)] \ [list reuse_responses_p $a(reuse_responses_p)] \