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 -r1.12 -r1.13
--- openacs-4/packages/project-manager/templates/project-ae.tcl	22 Jan 2007 16:05:20 -0000	1.12
+++ openacs-4/packages/project-manager/templates/project-ae.tcl	25 Jun 2007 07:26:11 -0000	1.13
@@ -244,9 +244,14 @@
 	if {![empty_string_p $customer_name]} {
 	    append customer_name " - "
 	}
-	if {[empty_string_p $parent_id]} {
+	if {$parent_id eq ""} {
 	    set parent_id $folder_id
 	}
+
+	if {$parent_id eq ""} {
+	    set parent_id $package_id
+	}
+
 	set planned_end_date_list [split $planned_end_date "-"]
 	append planned_end_date_list " [lrange $planned_end_time 3 5]"