Index: openacs-4/packages/curriculum/lib/curriculum-ave.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/curriculum/lib/curriculum-ave.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/curriculum/lib/curriculum-ave.tcl	11 Dec 2003 21:40:01 -0000	1.11
+++ openacs-4/packages/curriculum/lib/curriculum-ave.tcl	22 Feb 2004 22:01:54 -0000	1.12
@@ -16,7 +16,6 @@
 
 set package_id [curriculum::conn package_id]
 set user_id [ad_conn user_id]
-set owners_list [list]
 set actions [list]
 set element_mode {}
 set desc_help_text "[_ curriculum.lt_This_text_should_desc]"
@@ -34,8 +33,6 @@
 
     set title "[_ curriculum.Create_Curriculum]"
 
-    lappend owners_list [list [person::name -person_id $user_id] "$user_id"]
-
 } else {
 
     ####
@@ -112,16 +109,10 @@
 
     }
     
-    lappend owners_list [list [person::name -person_id $curriculum_array(owner_id)] $curriculum_array(owner_id)]
-
 }
 
 set context [list $title]
 
-# Curriculum "owner" select box. 
-lappend owners_list [list "[_ curriculum.Search]" ":search:"]
-
-
 ####
 #
 # Build the form.
@@ -201,19 +192,6 @@
     
 }
 
-# More fixed form elements
-# FIXME. Datatype "search" does not appear to work with ad_form very well.
-# Do we need an owner anyway when we're using workflow roles?
-ad_form -extend -name curriculum -form {
-    {owner_id:search,optional
-	{mode $element_mode}
-	{result_datatype integer}
-	{label "[_ curriculum.Owner]"}
-	{options $owners_list}  
-	{search_query {[db_map user_search]}}
-    }
-}
-
 ####
 #
 # Done defining the form elements.
@@ -246,7 +224,6 @@
 	-desc_format [template::util::richtext::get_property format $description] \
 	-comment [template::util::richtext::get_property contents $comment] \
 	-comment_format [template::util::richtext::get_property format $comment] \
-	-owner_id $owner_id \
 	-package_id $package_id
     
 } -edit_data {
@@ -258,7 +235,6 @@
 	-desc_format [template::util::richtext::get_property format $description] \
 	-comment [template::util::richtext::get_property contents $comment] \
 	-comment_format [template::util::richtext::get_property format $comment] \
-	-owner_id $owner_id \
 	-action_id $action_id \
 	-array curriculum_array