Index: openacs-4/packages/tasks/www/task.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/tasks/www/Attic/task.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/tasks/www/task.tcl	25 Sep 2005 23:49:23 -0000	1.3
+++ openacs-4/packages/tasks/www/task.tcl	26 Sep 2005 08:20:06 -0000	1.4
@@ -69,17 +69,6 @@
     ad_script_abort
 }
 
-set contact_options [db_list_of_lists contact_options {
-    select CASE WHEN o.name is null THEN p.first_names || ' ' || p.last_name ELSE o.name END as name, y.party_id
-    from parties y
-    left join persons p on (y.party_id = p.person_id)
-    left join organizations o on (y.party_id = o.organization_id)
-    where (p.person_id is not null or o.organization_id is not null)
-    and y.party_id > 0
-    order by 1
-}]
-set contact_options [concat [list [list "" ""]] $contact_options]
-
 set status_options [db_list_of_lists status_options {
     select title, status_id
     from t_task_status
@@ -123,11 +112,6 @@
             {help_text {You can either use a standard task or a custom task, but not both}}
 	}
 
-        {object_id:text(select),optional
-            {label "[_ tasks.Contact]"}
-            {options $contact_options}
-        }
-
 	{due_date:text
 	    {label "[_ tasks.Due]"}
 	    {html {id date1 size 10 maxlength 10}}
@@ -211,7 +195,6 @@
 			     -mime_type "text/plain" \
 			     -comment ${comment} \
 			     -party_id ${party} \
-			     -object_id $object_id \
 			     -due_date ${due_date} \
 			     -status_id ${status} \
 			     -package_id ${package_id} \
@@ -233,7 +216,6 @@
 			 -description ${description} \
 			 -mime_type "text/plain" \
 			 -comment ${comment} \
-			 -object_id $object_id \
 			 -due_date ${due_date} \
 			 -status_id ${status} \
 			 -priority ${priority}]