Index: openacs-4/packages/dotlrn/tcl/class-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/class-procs.xql,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/dotlrn/tcl/class-procs.xql	14 Aug 2002 19:13:41 -0000	1.14
+++ openacs-4/packages/dotlrn/tcl/class-procs.xql	29 Jun 2004 10:17:54 -0000	1.15
@@ -57,7 +57,7 @@
         <querytext>
             select 1
             from dotlrn_classes
-            where dotlrn_classes.class_key = :class_key
+            where dotlrn_classes.class_key = :community_type_key
         </querytext>
     </fullquery>