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 -r1.22 -r1.23
--- openacs-4/packages/dotlrn/tcl/community-procs.xql 19 Jan 2002 22:54:20 -0000 1.22
+++ openacs-4/packages/dotlrn/tcl/community-procs.xql 23 Jan 2002 00:15:43 -0000 1.23
@@ -194,10 +194,10 @@
select package_id
-from dotlrn_community_applets dca, dotlrn_applets da
-where community_id= :community_id
-and applet_key= :applet_key
-and dca.applet_id = da.applet_id
+from dotlrn_community_applets dca, dotlrn_applets da
+where community_id= :community_id
+and applet_key= :applet_key
+and dca.applet_id = da.applet_id
@@ -256,16 +256,16 @@
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_id= acs_sc_bindings.contract_id and
acs_sc_contracts.contract_name='dotlrn_applet'
-select applet_key
+select applet_key
from dotlrn_community_applets dca, dotlrn_applets da
-where community_id= :community_id
+where community_id= :community_id
and dca.applet_id = da.applet_id
@@ -278,9 +278,9 @@
-select applet_key
-from dotlrn_community_applets dca, dotlrn_applets da
-where community_id= :community_id
+select applet_key
+from dotlrn_community_applets dca, dotlrn_applets da
+where community_id= :community_id
and active_p = 't'
and dca.applet_id = da.applet_id
and status = 'active'