Index: openacs-4/packages/project-manager/www/task-add-edit-one.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/www/task-add-edit-one.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/project-manager/www/task-add-edit-one.tcl	5 Jun 2005 22:58:35 -0000	1.5
+++ openacs-4/packages/project-manager/www/task-add-edit-one.tcl	5 Jun 2005 23:20:54 -0000	1.6
@@ -41,6 +41,7 @@
 # use hour units or day units
 set use_day_p     [parameter::get -parameter "UseDayInsteadOfHour" -default "t"]
 set hours_day     [pm::util::hours_day]
+set root_folder_id [content::folder::get_folder_from_package -package_id $package_id]
 
 if {[string is true $use_day_p]} {
     set work_units "[_ project-manager.days]"
@@ -173,15 +174,15 @@
     }
         
 if {[string is true $edit_p]} {
-    if {![empty_string_p [category_tree::get_mapped_trees $package_id]]} {
+    if {![empty_string_p [category_tree::get_mapped_trees $root_folder_id]]} {
         ad_form -extend -name task_add_edit -form {
             {category_ids:integer(category),multiple {label "[_ project-manager.Categories]"}
                 {html {size 7}} {value {$task_id $package_id}}
             }
         }
     }
 } else {
-    if {![empty_string_p [category_tree::get_mapped_trees $package_id]]} {
+    if {![empty_string_p [category_tree::get_mapped_trees $root_folder_id]]} {
         ad_form -extend -name task_add_edit -form {
             {category_ids:integer(category),multiple,optional {label "[_ project-manager.Categories]"}
                 {html {size 7}} {value {}}