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.9 -r1.10 --- openacs-4/packages/project-manager/www/project-assign-edit.tcl 28 Jul 2005 08:23:45 -0000 1.9 +++ openacs-4/packages/project-manager/www/project-assign-edit.tcl 30 Jul 2005 18:32:36 -0000 1.10 @@ -11,11 +11,17 @@ } { project_item_id:integer,notnull return_url:notnull + {search_user_id ""} } -properties { } -validate { } -errors { } + +# Validate that search_user_id is on persons table to get the user name +ad_return_complaint 1 "[template::form is_valid search_user]" + + # The unique identifier for this package. set package_id [ad_conn package_id] @@ -62,6 +68,7 @@ set assignee_list_of_lists [pm::util::subsite_assignees_list_of_lists] + set html "
" + + + +ad_form -name search_user -form { + {project_item_id:text(hidden) + {value $project_item_id} + } + {return_url:text(hidden) + {value $return_url} + } + {search_user_id:party_search(party_search),optional + {label "Search for User:"} + } +} +