Index: openacs-4/contrib/packages/project-manager/tcl/task-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/tcl/Attic/task-procs.tcl,v
diff -u -r1.4.2.42 -r1.4.2.43
--- openacs-4/contrib/packages/project-manager/tcl/task-procs.tcl	2 May 2005 18:30:11 -0000	1.4.2.42
+++ openacs-4/contrib/packages/project-manager/tcl/task-procs.tcl	14 May 2005 10:13:19 -0000	1.4.2.43
@@ -800,11 +800,17 @@
     object_id
 } {
     
-    set package_id [db_string pm_package_id "select package_id from cr_folders cf, cr_items ci1, cr_items ci2 where cf.folder_id = ci1.parent_id and ci1.item_id = ci2.parent_id and ci2.item_id = :object_id"]
+    
+    set package_id [db_string pm_package_id "select package_id from cr_folders cf, cr_items ci1, cr_items ci2 where cf.folder_id = ci1.parent_id and ci1.item_id = ci2.parent_id and ci2.item_id = :object_id" -default 0]
+    
+    if {$package_id == 0} {
+        
+        set url [site_node_closest_ancestor_package_url -package_key "project-manager"]
+    } else {
+        set url "[ad_url]"
+        append url [site_node::get_url_from_object_id -object_id $package_id]
+    }
 
-    set url "[ad_url]"
-    append url [site_node::get_url_from_object_id -object_id $package_id]
-
     set package_url "${url}task-one?task_id=$object_id"
 
     return $package_url