Index: openacs-4/packages/dotlrn/tcl/community-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.xql,v
diff -u -N -r1.24 -r1.25
--- openacs-4/packages/dotlrn/tcl/community-procs.xql	11 Feb 2002 05:16:58 -0000	1.24
+++ openacs-4/packages/dotlrn/tcl/community-procs.xql	11 Feb 2002 22:25:01 -0000	1.25
@@ -266,11 +266,12 @@
 
 <fullquery name="dotlrn_community::list_applets.select_all_applets">
 <querytext>
-select impl_name from acs_sc_impls, acs_sc_bindings, acs_sc_contracts
-where
-acs_sc_impls.impl_id = acs_sc_bindings.impl_id and
-acs_sc_contracts.contract_id= acs_sc_bindings.contract_id and
-acs_sc_contracts.contract_name='dotlrn_applet'
+    select impl_name
+    from acs_sc_impls, acs_sc_bindings, acs_sc_contracts, dotlrn_applets
+    where acs_sc_impls.impl_id = acs_sc_bindings.impl_id
+    and acs_sc_impls.impl_name = dotlrn_applets.applet_key
+    and acs_sc_contracts.contract_id = acs_sc_bindings.contract_id
+    and acs_sc_contracts.contract_name = 'dotlrn_applet'
 </querytext>
 </fullquery>