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.72 -r1.73
--- openacs-4/packages/dotlrn/tcl/community-procs.xql 13 Jun 2002 04:35:59 -0000 1.72
+++ openacs-4/packages/dotlrn/tcl/community-procs.xql 12 Jul 2002 21:26:48 -0000 1.73
@@ -28,7 +28,7 @@
- update dotlrn_communities set package_id= :package_id where community_id= :community_id
+ update dotlrn_communities_all set package_id= :package_id where community_id= :community_id
@@ -79,7 +79,7 @@
- update dotlrn_communities
+ update dotlrn_communities_all
set portal_id = :portal_id,
non_member_portal_id = :non_member_portal_id,
admin_portal_id = :admin_portal_id
@@ -325,7 +325,7 @@
- update dotlrn_communities
+ update dotlrn_communities_all
set pretty_name = :pretty_name
where community_id = :community_id
@@ -349,7 +349,7 @@
- update dotlrn_communities
+ update dotlrn_communities_all
set description = :description
where community_id = :community_id
@@ -398,7 +398,7 @@
- update dotlrn_communities
+ update dotlrn_communities_all
set portal_id = :portal_id,
non_member_portal_id = :non_member_portal_id,
admin_portal_id = :admin_portal_id
@@ -408,13 +408,13 @@
- update dotlrn_communities set archived_p = 't' where community_id = :community_id
+ update dotlrn_communities_all set archived_p = 't' where community_id = :community_id
- update dotlrn_communities set archived_p = 'f' where community_id = :community_id
+ update dotlrn_communities_all set archived_p = 'f' where community_id = :community_id