Index: openacs-4/packages/project-manager/tcl/project-manager-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/tcl/project-manager-procs.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/project-manager/tcl/project-manager-procs.tcl	23 Mar 2007 07:53:22 -0000	1.19
+++ openacs-4/packages/project-manager/tcl/project-manager-procs.tcl	2 Aug 2007 11:35:19 -0000	1.20
@@ -317,7 +317,7 @@
     
     @error 
 } {
-    return [site_node::get_url_from_object_id -object_id [lindex [application_link::get_linked -from_package_id [ad_conn package_id] -to_package_key logger] 0]]
+    return [lindex [site_node::get_url_from_object_id -object_id [lindex [application_link::get_linked -from_package_id [ad_conn package_id] -to_package_key logger] 0]] 0]
 }
 
 
@@ -690,7 +690,7 @@
     } else {
         set return_val ""
     }
-    append return_val [site_node::get_url_from_object_id -object_id $package_id]
+    append return_val [lindex [site_node::get_url_from_object_id -object_id $package_id] 0]
 
     return $return_val
 }