Index: openacs-4/packages/project-manager/www/project-assign-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/www/project-assign-edit.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/project-manager/www/project-assign-edit.tcl	26 May 2005 09:34:29 -0000	1.4
+++ openacs-4/packages/project-manager/www/project-assign-edit.tcl	10 Jun 2005 19:21:15 -0000	1.5
@@ -22,6 +22,11 @@
 # The id of the person logged in and browsing this page
 set user_id [ad_maybe_redirect_for_registration]
 
+# We want to assign people based on one or more categories. For this a
+# new page should be made available to add users based on categories.
+ 
+set project_assign_categories_url [export_vars -base project-assign-from-categories {project_item_id return_url}]
+
 # permissions
 permission::require_permission -party_id $user_id -object_id $project_item_id -privilege write
 
@@ -61,6 +66,8 @@
     set assigned($party_id-$role_id) 1
 }
 
+set contact_id [application_data_link::get_linked -from_object_id $party_id -to_object_type "content_item"]
+
 set assignee_list_of_lists [db_list_of_lists get_assignees {
     select distinct
     p.first_names || ' ' || p.last_name as name,
@@ -106,6 +113,9 @@
 
     }
 
+    # Add the list of Employees from the customer as well if they are
+    # not already in the list above.
+
     append html "</td>"
 
 }