Index: openacs-4/packages/project-manager/templates/project-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/templates/project-ae.tcl,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/project-manager/templates/project-ae.tcl	14 Sep 2005 08:42:23 -0000	1.4
+++ openacs-4/packages/project-manager/templates/project-ae.tcl	14 Sep 2005 16:00:18 -0000	1.5
@@ -21,11 +21,12 @@
     set project_id [pm::project::get_project_id -project_item_id $project_item_id]
 }
 
+# pm_project_title_seq does not exist in the database -alex
 # We want to use project numbers if no project_name is given.
 # If the user wants, he can still provide a project_name
-if {[empty_string_p $project_name]} {
-    set project_name [db_nextval pm_project_title_seq]
-}
+#if {[empty_string_p $project_name]} {
+#    set project_name [db_nextval pm_project_title_seq]
+#}
 
 if {[exists_and_not_null project_id]} {
     set title "[_ project-manager.lt_Edit_a_project_term_l]"
@@ -317,4 +318,4 @@
 	ad_script_abort
 }
 
-ad_return_template "../templates/project-ae"
\ No newline at end of file
+ad_return_template "../templates/project-ae"