Index: openacs-4/packages/dotlrn/www/admin/classes-chunk.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/classes-chunk.xql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/dotlrn/www/admin/classes-chunk.xql	18 May 2002 22:42:11 -0000	1.6
+++ openacs-4/packages/dotlrn/www/admin/classes-chunk.xql	30 Oct 2003 17:04:40 -0000	1.7
@@ -10,8 +10,10 @@
                    dotlrn_classes_full.department_key,
                    dotlrn_departments_full.pretty_name as department_name,
                    (select count(*)
-                    from dotlrn_class_instances
-                    where dotlrn_class_instances.class_key = dotlrn_classes_full.class_key) as n_instances
+                     from dotlrn_class_instances, dotlrn_communities_all
+                    where dotlrn_class_instances.class_key = dotlrn_classes_full.class_key
+                      and dotlrn_class_instances.class_instance_id = dotlrn_communities_all.community_id
+                      and dotlrn_communities_all.archived_p = 'f') as n_instances
             from dotlrn_classes_full,
                  dotlrn_departments_full
             where dotlrn_classes_full.department_key = dotlrn_departments_full.department_key
@@ -29,8 +31,10 @@
                    dotlrn_classes_full.department_key,
                    dotlrn_departments_full.pretty_name as department_name,
                    (select count(*)
-                    from dotlrn_class_instances
-                    where dotlrn_class_instances.class_key = dotlrn_classes_full.class_key) as n_instances
+                    from dotlrn_class_instances, dotlrn_communities_all
+                    where dotlrn_class_instances.class_key = dotlrn_classes_full.class_key
+                      and dotlrn_class_instances.class_instance_id = dotlrn_communities_all.community_id
+                      and dotlrn_communities_all.archived_p = 'f') as n_instances
             from dotlrn_classes_full,
                  dotlrn_departments_full
             where dotlrn_classes_full.department_key = :department_key