Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v
diff -u -r1.191.2.9 -r1.191.2.10
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	12 Aug 2005 02:52:02 -0000	1.191.2.9
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	17 Aug 2005 21:43:36 -0000	1.191.2.10
@@ -2202,7 +2202,7 @@
 	set package_id [dotlrn_community::get_package_id $community_id]
 	set site_node_id [site_node::get_node_id_from_object_id -object_id $package_id]
 	set url [site_node::get_children -package_key "$package_key" -node_id $site_node_id]
-	array set site_node [site_node::get_from_url -url $url]
+	array set site_node [site_node::get_from_url -url [lindex $url 0]]
 	return $site_node(package_id)
     }