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.8 -r1.9 --- openacs-4/packages/project-manager/www/project-assign-edit.tcl 28 Jul 2005 08:12:59 -0000 1.8 +++ openacs-4/packages/project-manager/www/project-assign-edit.tcl 28 Jul 2005 08:23:45 -0000 1.9 @@ -62,7 +62,6 @@ set assignee_list_of_lists [pm::util::subsite_assignees_list_of_lists] - set html "
" foreach role_list $roles_list_of_lists { @@ -76,6 +75,7 @@ foreach assignee_list $assignee_list_of_lists { set name [lindex $assignee_list 0] set person_id [lindex $assignee_list 1] + set email [party::email -party_id $person_id] if {[exists_and_not_null assigned($person_id-$role)]} { set checked "checked" @@ -85,7 +85,7 @@ append html " $name + type=\"checkbox\" $checked />$name ($email)
"