Index: openacs-4/contrib/packages/project-manager/www/add-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/add-edit.tcl,v diff -u -r1.12.2.2 -r1.12.2.3 --- openacs-4/contrib/packages/project-manager/www/add-edit.tcl 5 Dec 2003 01:09:19 -0000 1.12.2.2 +++ openacs-4/contrib/packages/project-manager/www/add-edit.tcl 13 Dec 2003 01:19:54 -0000 1.12.2.3 @@ -43,7 +43,9 @@ set use_goal_p [parameter::get -parameter "UseGoalP" -default "1"] set use_project_code_p [parameter::get -parameter "UseUserProjectCodesP" -default "1"] +set use_project_customizations_p [parameter::get -parameter "UseProjectCustomizationsP" -default "0"] + if {[exists_and_not_null project_id]} { set title "Edit a $project_term_lower" set context_bar [ad_context_bar "Edit $project_term"] @@ -161,10 +163,15 @@ } -new_data { set project_id [db_exec_plsql new_project_item { *SQL* }] set project_item_id [db_string get_item_id { }] - - ad_returnredirect "one?[export_url_vars project_item_id project_id]" - ad_script_abort - + + if {$use_project_customizations_p} { + ad_returnredirect "add-edit-2?[export_url_vars project_item_id project_id]" + ad_script_abort + } else { + ad_returnredirect "one?[export_url_vars project_item_id project_id]" + ad_script_abort + } + } -edit_data { set project_id [db_exec_plsql new_project_revision { *SQL* }] @@ -174,6 +181,11 @@ } -after_submit { - ad_returnredirect "one?[export_url_vars project_id]" - ad_script_abort + if {$use_project_customizations_p} { + ad_returnredirect "add-edit-2?[export_url_vars project_id]" + ad_script_abort + } else { + ad_returnredirect "one?[export_url_vars project_id]" + ad_script_abort + } }