Index: openacs-4/packages/new-portal/tcl/portal-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs.xql,v
diff -u -r1.36 -r1.37
--- openacs-4/packages/new-portal/tcl/portal-procs.xql 28 Jun 2002 20:08:29 -0000 1.36
+++ openacs-4/packages/new-portal/tcl/portal-procs.xql 29 Jun 2002 15:41:05 -0000 1.37
@@ -643,14 +643,16 @@
-
-
- select element_id from portal_element_map pem, portal_pages pp
- where pp.portal_id= :portal_id
- and datasource_id= :ds_id
- and pem.page_id = pp.page_id
-
-
+
+
+ select portal_element_map.element_id
+ from portal_element_map,
+ portal_pages
+ where portal_pages.portal_id = :portal_id
+ and portal_element_map.datasource_id = :ds_id
+ and portal_element_map.page_id = portal_pages.page_id
+
+