Index: openacs-4/packages/imsld/www/admin/imsld-groups.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/imsld-groups.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/imsld/www/admin/imsld-groups.xql	30 Mar 2006 16:01:46 -0000	1.1
+++ openacs-4/packages/imsld/www/admin/imsld-groups.xql	19 May 2006 17:26:03 -0000	1.2
@@ -2,9 +2,16 @@
 <queryset>
 	<fullquery name="get_groups_list">
 		<querytext>
-        select group_name,group_id
-        from groups
-        where group_name like ('%' || :role || '%')
+         select gr.group_id,
+                gr.group_name
+         from groups gr, 
+              acs_rels ar, 
+              imsld_run_users_group_ext iruge 
+         where ar.rel_type='imsld_roleinstance_run_rel' 
+               and ar.object_id_one=gr.group_id 
+               and ar.object_id_two=iruge.group_id 
+               and iruge.run_id=:run_id
+               and  group_name like ('%' || :role || '%')
 		</querytext>
 	</fullquery>
 </queryset>