Index: openacs-4/packages/project-manager/www/add-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/www/add-edit.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/project-manager/www/add-edit.tcl 4 Jun 2005 12:52:21 -0000 1.7 +++ openacs-4/packages/project-manager/www/add-edit.tcl 5 Jun 2005 00:11:05 -0000 1.8 @@ -92,6 +92,8 @@ {value $project_item_id} } + {dform:text(hidden)} + {project_name:text {label "[_ project-manager.lt_set_project_term_name]"} {value $project_name} @@ -238,7 +240,7 @@ -form add_edit \ -cr_widget none \ -defaults [list title $project_name description $description mime_type "text/plain" context_id $parent_id parent_id $parent_id object_type pm_project] \ - -default_fields {project_code goal {planned_start_date $planned_start_date_sql} {planned_end_date $planned_end_date_sql} actual_start_date actual_end_date ongoing_p status_id customer_id} \ + -default_fields {project_code goal {planned_start_date $planned_start_date_sql} {planned_end_date $planned_end_date_sql} actual_start_date actual_end_date ongoing_p status_id customer_id dform} \ -exclude_static] set project_item_id [pm::project::get_project_item_id -project_id $project_id] @@ -273,7 +275,7 @@ -form add_edit \ -cr_widget none \ -defaults [list title $project_name description $description mime_type "text/plain" context_id $parent_id parent_id $parent_id object_type pm_project] \ - -default_fields {project_code goal {planned_start_date $planned_start_date_sql} {planned_end_date $planned_end_date_sql} actual_start_date actual_end_date ongoing_p status_id customer_id} \ + -default_fields {project_code goal {planned_start_date $planned_start_date_sql} {planned_end_date $planned_end_date_sql} actual_start_date actual_end_date ongoing_p status_id customer_id dform} \ -exclude_static] set project_item_id [pm::project::get_project_item_id -project_id $project_id]