Index: openacs-4/packages/assessment/tcl/as-section-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-section-procs.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/assessment/tcl/as-section-procs.tcl 14 Nov 2004 16:47:04 -0000 1.2 +++ openacs-4/packages/assessment/tcl/as-section-procs.tcl 15 Nov 2004 17:17:15 -0000 1.3 @@ -7,7 +7,6 @@ namespace eval as::section {} ad_proc -public as::section::new { - {-name:required} {-title:required} {-description ""} {-definition ""} @@ -27,7 +26,7 @@ # Insert as_section in the CR (and as_sections table) getting the revision_id (as_section_id) db_transaction { - set section_item_id [content::item::new -parent_id $folder_id -content_type {as_sections} -name $name -title $title -description $description ] + set section_item_id [content::item::new -parent_id $folder_id -content_type {as_sections} -name [ad_generate_random_string] -title $title -description $description ] set as_section_id [content::revision::new \ -item_id $section_item_id \