Index: openacs-4/packages/acs-subsite/www/site-map/index-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/site-map/index-oracle.xql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/acs-subsite/www/site-map/index-oracle.xql 13 Jan 2005 13:55:51 -0000 1.2 +++ openacs-4/packages/acs-subsite/www/site-map/index-oracle.xql 14 Feb 2005 21:56:39 -0000 1.3 @@ -50,13 +50,16 @@ acs_object.name(object_id) as object_name, directory_p, parent_id - from site_nodes n,site_nodes_selection sn + from site_nodes n where (object_id is null or exists ( select 1 from acs_object_party_privilege_map ppm where ppm.object_id = n.object_id and ppm.party_id = :user_id - and ppm.privilege = 'read')) and sn.node_id=n.node_id + and ppm.privilege = 'read')) + and exists ( + select 1 from site_nodes_selection sn + where sn.node_id = n.node_id) start with node_id = nvl(:root_id, site_node.node_id('/')) connect by prior node_id = parent_id and parent_id in ([join $expand ", "])) site_map where site_map.object_id = p.package_id (+)